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Parasites radio et television 

L'equipement deceit dans ce manuel genere et utilise des signaux 
hautes frequences. Si ce materiel n'est pas installe et employe 
convenablement, c'est-a-dire en suivant nos instructions a la lettre, 
il peut se produire des interferences avec la reception radio et 
television. Ces interferences ressemblent aux parasites sur une 
radio et aux images "neigeuses" a la television. 

L'equipement a ete teste ; il est conforme au materiel informatique 
de classe B, selon les specifications du sous-titre J, 1 5 e partie, des 
Reglementations de la Commission des Communications Federales 
(FCC). Ces regies sont concues pour assurer une protection 
suffisante contre ces interferences dans une installation 
residentielle. Toutefois, on ne peut garantir I'absence de telles 
interferences dans une installation donnee, en particulier si Ton 
utilise une antenne de television interieure. 

On peut determiner si les interferences sont dues a I'ordinateur en 
I'arretant. Si les parasites s'arretent, c'est probablement qu'ils 
etaient dus a I'ordinateur. Si votre ordinateur provoque 
effectivement des interferences vis-a-vis de la reception 
radio/television, il est possible d'essayer d'y remedier, au moyen de 
Tune ou de plusieurs des mesures suivantes : 



• Debrancher les peripheriques et leurs cables d'entree/sortie les 
uns apres les autres. Si les parasites s'arretent, c'est qu'ils 
proviennent soit du piripherique soit de son cable. Ces unites 
exigent generalement des cables blindes. Vous pouvez vous 
procurer des cables correctement blindes pour vos 
peripheriques Apple aupres de votre concessionnaire. Si vos 
peripheriques sont d'une marque autre que Apple, contacter le 
fabricant ou votre concessionnaire pour qu'il vous conseille. 

• Orienter I'antenne de radio ou de television jusqu'a ce que les 
parasites s'arretent. 

• Deplacer I'ordinateur, de part et d'autre du poste de radio ou 
de television. 

• Eloigner I'ordinateur du poste de radio ou de television. 

• Brancher I'ordinateur a une prise appartenant a un circuit 
different de celui du poste de radio ou de television. (Ce qui 
revient a s'assurer que I'ordinateur et les postes de radio ou 
de television sont branches sur des circuits commandes par 
des disjoncteurs ou des fusibles differents.) 

• Songer a installer une antenne de television sur le toit, reliee 
par un cable coaxial a votre poste de television. 

Si besoin est, consultez votre concessionnaire ou un technicien 
radio/television experiments pour qu'il vous suggere d'autres idees. 



Le Guide : 

"Comment identifier et Resoudre les Problemes de Parasites Radio 
et Television", 

publie par la Communication Federale des Communications (FCC) 
pourra vous etre utile. 

Vous pourrez vous procurez ce guide a I'adresse suivante : 
U.S. Government Printing Office, Washington, DC 20402. 
Numero de stock : 004-000-00345-4. 



Applesoft Tutorial : Travaux Pratiques 
Applesoft 

Les programmes proposes en exemple dans ce manuel sont 
disponibles sur la disquette « Applesoft Sampler ». Pour conserver 
la comptabilite avec cette disquette, les programmes ont ete 
reproduits dans le manuel dans leur version originale. 
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Generalites 



L'apprentissage de la 
programmation 



Bonjour ! C'est le manuel qu'il vous faut si vous voulez apprendre a 
programmer ou vous familiariser avec la programmation. De toute 
facon, il est concu pour que vous appreniez avec plaisir. 

Vous apprendrez, par exemple, comment faire dire bonjour a vos 
amis par votre ordinateur, comment utiliser votre ordinateur comme 
un calculateur, et comment programmer votre ordinateur pour lui 
faire dessiner des chevaux sur tout I'ecran. 

Si vous commencez par le debut, faites tous les exercices comme 
ils viennent et n'oubliez pas de prendre votre temps et alors, il est 
certain que vous apprendrez comment programmer. Le secret de la 
reussite est de prendre son temps et de ne rien laisser de cote. 

Vous ne pouvez pas apprendre a programmer seulement par la 
lecture de ce livre ou d'un autre. La pratique est indispensable 
comme pour apprendre a faire de la bicyclette, pour faire pousser 
des legumes ou pour conduire une voiture. Faire des erreurs et les 
corriger est un facteur tres important de la reussite. Pour 
programmer, c'est la meme chose. Si vous suivez bien ce qui est 
indique dans ce manuel, vous ne devrez pas vous inquieter si tout 
ne marche pas bien du premier coup. II vaut bien mieux 
comprendre pourquoi tout n'a pas bien fonctionne. 

Ce manuel est organise de telle maniere que vous puissiez 
apprendre chaque chose pas a pas. II est egalement organise pour 
aller a votre rythme. Les points d'arret sont notes dans le livre. 

iQu'est-ce que la programmation ? 

Un programme d'ordinateur est une suite d'instructions ecrites 
dans ce que I'ori appelle un langage source. C'est grace aux 
programmes que les choses se passent. lis peuvent enseigner a 
I'ordinateur comment afficher un message sur I'ecran, comment 
calculer des taxes complexes, comment jouer ou comment 
dessiner. Les programmes, en un mot, vous permettent de faire 
des tas de choses avec votre ordinateur. 



L 'apprentissage de la programmation 



Le BASIC est un langage couramment utilise par les ordinateurs 
individuels. II est simple a apprendre et a utiliser. II y a de 
nombreuses varietes de BASIC ; chaque type d'ordinateur 
individuel en utilise une version legerement differente. C est 
comme des dialectes regionaux : bien que les gens parlent 
differemment, its utilisent le meme vocabulaire et peuvent se 
comprendre. 

Le BASIC Applesoft, qui est resident dans I'Appel He, est une 
variete particulierement puissante du BASIC. II a des Ppss.bil.te 
qraphiques que n'ont pas beaucoup d'autres varietes de BAblU ue 
manuel apprend a mettre en ceuvre le BASIC Applesoft, ma.s, bien 
qu'il soit specifique a Applesoft, il vous permettra de comprendre 
d'autres versions du BASIC. 

Apprendre un langage de programmation est comme apprendre un 
second lanqaqe : de nouveaux mots et des regies syntaxiques de 
HaPson sont a connaTtre. II y a environ 100 mots dans le langage de 
programmation BASIC Applesoft. 

Comment preparer votre machine 

Avant de commencer le chapitre 1, preparez votre machine et ses 
accessoires : 

• Une console de visualisation et un lecteur de disquette doivent 
etre connectes a Apple He. Les cables d'alimentation de 
I'ordinateur et de la console doivent etre branches dans une 
prise comportant une prise de terre. Si vous ne possedez pas 
cet accessoire reportez-vous au Guide de I'Utthsateur Apple lie 
{Apple He Owner's Manual) pour les instructions d installation. 

• Assurez-vous que vous avez la disquette DOS 3.3 SYSTEM 
MASTER, la disquette APPLESOFT SAMPLER et une disquette 
vierge initialisee. Si vous ne savez comment preparer une 
nouvelle disquette a recevoir de I'information, reportez-vous 
au Guide de I'Utilisateur Apple He. 

• Si vous utilisez un lecteur de cassette au lieu d'un lecteur de 
disquette, les commandes speciales dont vous aurez besom 
sont decrites dans le Manuel de Reference du programmer 
BASIC Applesoft (Applesoft BASIC Programmer's Reference 
Manual). 

Si vous avez une Carte Texte 80 Colonnes, rendez-la inactive 
tant que vous utiliserez ce manuel : cela vous facilitera 
I'apprentissage d'Applesoft. Plus tard vous pourrez lire le 
Manuel Apple He sur la Carte Texte 80 Colonnes pour voir 
comment Applesoft fonctionne avec cette carte active. 
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Chose a savoir 



Cette presentation n'est pas un guide exhaustif d'Applesoft. Afin 
de simplifier les choses, ce qui n'a pas besoin d'etre connu par le 
programmeur debutant a ete passe sous silence. En d'autres termes, 
ne soyez pas surpris que tout ne soit pas enseigne. C'est I'objet du 
Manuel de Reference du Programmeur BASIC Applesoft. 



La signification des mots 

Les termes techniques qui peuvent ne pas vous etre familiers sont 
imprimes en italique. Chaque mot en italique est defini dans le 
glossaire. 

II y a egalement plusieurs annexes qui vous aideront a comprendre 
la signification des mots. 

• L'annexe A definit et resume les instructions Applesoft. 

• L'annexe B liste les mots reserves (ne vous inquietez pas — vous 
comprendrez ce qu'ils veulent dire le moment venu). 

• L'annexe C commente les messages d'erreurs. 



Les symboles 

II y a trois symboles particuliers utilises dans ce manuel. 

Le symbole de pause indique les endroits du texte ou vous pouvez 
interrompre votre lecture. Ce n'est pas une obligation lorsque vous 
rencontrez ce symbole — C'est simplement une aide. 

Le rectangle grise est utilise pour vous clarifier la lecture ou pour 
vous rappeler quelques techniques utiles. Pour le distinguer du 
texte principal, il est imprime sur fond sombre. 

Le symbole d'attention vous previent qu'a cet endroit se trouve 
une information tres importante que vous ne devez pas manquer. II 
vous previent egalement que vous avez quelque chose a faire pour 
la bonne execution de vos programmes. 



Note : les manipulations de clavier detaillees dans ce manuel sont 
valables pour le mode QWERTY. 



Les symboles 



XI 



Ou obtenir d'autres renseignements ? 



Avant de commencer I'etude de ce manuel, il vous faudrait lire le 
Guide de I'Utilisateur Apple He et lancer I'execution de la disquette 
APPLE PRESENTS... APPLE. 

Le manuel associe a cet ouvrage est le Manuel de Reference du 
Programmeur Basic Applesoft. Le manuel de reference comporte 
des indications detaillees et completes sur Applesoft, commente 
I'architecture des programmes et donne de bons conseils de 
programmation. Servez-vous du manuel de reference pour 
perfectionner vos connaissances sur la programmation une fois que 
vous aurez acquis les connaissances de base dans ce manuel. 

Le Manuel DOS contient des informations completes concernant les 
commandes du systeme d'exploitation disque et la facon dont le 
systeme d'exploitation fonctionne. Quand vous aurez plus 
d'experience dans la programmation, vous souhaiterez lire ce 
manuel. 
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Chapitre 1 
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Figure 1-1. Le curseur et le 
caractere d'attente. 



Maintenant au travail ! Recherchez la disquette intitulee DOS 3.3 
SYSTEM MASTER. Placez-la dans le lecteur de disquette et fermez 
la porte du lecteur. Mettez votre ordinateur sous tension. Des que 
le voyant rouge du lecteur de disquette s'eteindra, vous verrez 
apparaitre un caractere d'attention crochet (]) ainsi qu'un curseur 
clignotant au coin gauche de votre ecran. 

Si vous ne les voyez pas, verifiez votre installation. Le lecteur de 
disquette est-il bien connecte ? La console de visualisation est-elle 
branchee et mise sous tension ? Apple He est-il bien sous tension ? 

Le BASIC Applesoft est resident dans Apple lie, ainsi le lecteur de 
disquette n'est pas indispensable. Si vous utilisez un lecteur de 
cassette, reportez-vous au Manuel de Reference & 'Applesoft. 

Quand le curseur est apparu, enfoncez la touche \J\ dans la 
position « on ». Elle se trouve dans le coin inferieur gauche du 
clavier. En actionnant la touche vous devez entendre un cliquetis 
moins important que pour les autres touches. 

Les instructions du BASIC Applesoft doivent etre introduites en 
majuscules. La touche [J] le facilite. Comme la touche majuscule 
pour les caracteres d'une machine a ecrire, |T| transforme toutes les 
lettres en majuscules, tout en vous laissant la possibility de frapper 
des chiffres. Si vous avez besoin d'un caractere majuscule d'une 
touche non-alphabetique vous n'aurez a utiliser que la touche [¥] 
Vous utiliserez, par exemple, la touche [ft] pour acceder aux 
guillemets. 



Attention 

A chaque fois que vous utiliserez le BASIC Applesoft avec Apple He, 
assurez-vous que la touche |T| est activee. Si elle ne Test pas et si 
vous essayez d'introduire une instruction en minuscules, votre 
ordinateur vous alertera par un signal sonore et par le message 
7SYNTAX ERROR. Applesoft ne comprend que les instructions en 
majuscules. 
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Illustration 1-2. L'instruction PRINT. 
Quand vous introduisez une 
instruction comme celle-ci dans 
Apple He vous devez taper 
exactement ce que vous voyez dans 
ce manuel, y compris les espaces, 
les lettres majuscules, et les points 
de ponctuation. 



Une premiere instruction 

Vous etes prets a introduire quelques instructions dans Apple lie, 
ainsi entrez les mots que vous voyez plus bas. Rappelez-vous que pour 
acceder aux guillemets vous devez appuyer sur la touche [¥]. 
Tapez 



PRINT "HELLO' 



et appuyez sur la touche 



Caractere d'attention 



PRINT "HELLO' 
Applesoft 



est l'instruction 



PRINT est le verbe Applesoft 

Hello s'affiche apres avoir tape sur 
la touche et le curseur se 
deplace sur la ligne qui suit la ligne 
affichee 

Les lettres entre guillemets sont 
celles que vous voulez faire 
imprimer par Apple lie (affichage sur 
I'ecran). 



PRINT "HELLO' 
HELLO 




Apple He devra repondre a vos instructions en affichant le mot 
bHh hello 



sur la ligne suivante. S'il apparait bien a la suite de vos 
instructions, alors bravo ! 

Si I'image de votre ecran ne coincide pas avec celle qui est 
presentee dans ce manuel, cela n'est pas grave. Recommencez. 
Regardez votre ecran et verifiez bien ce que vous avez tape. Notez 
que chacune des remarques qui vous sont presentees plus bas 
correspond a un des exemples de Illustration 1-3. 

1 . Avez-vous bien utilise les lettres majuscules ? Si non, 
enfoncez la touche [T] et recommencez. 
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4. 



Le curseur clignote-t-il bien juste apres le deuxieme 
guillemet ? Si oui, tapez . (Chaque instruction doit etre 
suivie par une frappe sur la touche pour indiquer a Apple 
He que I'instruction est terminee). 

Y-a-t-il bien des guillemets de part et d'autre de HELLO? Si 
non, retapez I'instruction. Si c'est une apostrophe qui est 
affichee, assurez-vous que la touche QF] est bien enfoncee 
pour obtenir le guillemet. 

Si vous avez oublie le premier caractere de ponctuation, 
I'ordinateur affichera un zero juste en dessous de votre 
instruction. 

Le verbe PRINT est-il bien orthographie ? Si non, 
recommencez. 



5. Maintenant tout est bon ! 



Illustration 1-3. Analyser un 
probleme sur I'ecran 



1- 

2- 

3- 

4 

5- 



prinl "hello" 
?SYNTAX ERROR 

PRINT "HELLO" I 

■PRINT HELLO 


PRIMT "HELLO" 
?SYNTAX ERROR 

PRINT "HELLO- 
HELLO 



Un verbe est un mot qui caracterise 
une instruction ou une commande 
particuliere d'Applesoft. PRINT est 
un verbe. 



Si un verbe est mal orthographie (comme PRINT) dans une 
instruction (PRINT "HELLO" est une instruction), vous recevrez le 
message d'erreur : 



Une instruction est une suite de 
mots dans le langage de 
I'ordinateur. 



?SYNTAX ERROR 

Si vous n'avez pas detecte une faute d'orthographe avant 
I'apparition de ce message, il n'y a qu'une seule chose a faire, 
c'est de reintroduce I'instruction. Verifiez bien que tout est correct 
avant d'actionner la touche R 



Une premiere instruction 



Si vous detectez une erreur avant d'avoir tape , vous pouvez la 
rectifier sans avoir a retaper la ligne complete. Actionnez la touche 

□ jusqu'a ce que le curseur se trouve sur I'erreur. Corrigez-la. 
Actionnez alors la touche H jusqu'a ce que le curseur soit revenu 
a la fin de la ligne. Tapez ■ 



Un conseil d'ami : Une sage parole : personne n'est parfait. Cela vous prendra un 
bon laps de temps avant d'etre completement familiarise avec le clavier de 
I'ordinateur et avant que vos doigts trouvent a chaque fois les bonnes touches. 
Seule la pratique vous aidera, done ne vous decouragez pas ! Des que vous 
saurez utiliser les touches de deplacement du curseur, vous verrez que la 
correction des erreurs ne prend pas beaucoup de temps. Et, quand vous serez 
convaincu qu'il est necessaire de verifier chaque ligne avant la frappe de , 
que la vie est bien plus facile. 



Maintenant tapez I'instruction suivante, en remplacant les blancs 
par votre nom. Et n'oubliez pas de taper . 

PRINT "BONJOUR, MON NOM EST ." 

Ca marche ? Sinon, ne vous decouragez pas. L'ordinateur 
n'explosera pas si vous ne faites pas les choses exactement 
comme il faut. II attend simplement que vous lui donniez une 
instruction qu'il reconnaisse. Contrairement a une personne, 'un 
ordinateur ne peut pas imaginer ce que vous voulez dire ; il ne 
comprend que certains mots dans un certain ordre. Verifiez done ce 
que vous tapez et recommencez. 

Maintenant entrez 

PRINT "LE CIEL EST ROUGE, L'HERBE EST BLEUE" 

Apple He affiche exactement ce que vous lui avez demande. Meme 
si ce n'est pas vrai ! 

PRINT est I'illustration primaire 
Applesoft pour imprimer sur I'ecran 



Quand vous demandez a Apple He d'afficher quelque chose entre 
guillemets, vous lui demandez d'afficher sur I'ecran tous les 
caracteres se trouvant entre ces guillemets. Vous pouvez utiliser 
I'instruction PRINT pour demander a l'ordinateur d'afficher 
n'importe quel message que vous voulez. Essayez done ! 



Si vous tapez plus de 240 caracteres en une seule fois, (255 pour etre 
exact) l'ordinateur vous repondra par un signal sonore et affichera le 
caractere barre oblique inverse (\) quand le nombre maximum de 
caracteres est atteint. Vous devez alors recommencer. L'illustration 1-4 
illustre ce depassement en nombre de caracteres. 
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Illustration 1-4. Le nombre 
maximum de caracteres sur I'ecran. 
La largeur d'une ligne de I'ecran est 
de 40 caracteres. II faut 6 lignes et 
demie de I'ecran pour atteindre le 
nombre maximum de caracteres 
d'une ligne Applesoft. 



IPRINT "THE QUICK BROWN FOX JUMPED OVER T 
HE LAZY DOG'S TAIL WHILE THE DOG ATE A CA 
N OF CAVIAR. MY AUNT LOOKED ON IN HORROR 
BECAUSE SHE WAS PLANNING TO FEED THE CAVI 
AR TO HER GOLDFISH/I WAS SECRETLY HAPPY 
SINCE I KNOW THAT THE LAZY DOG LOVES CAVI 
AR AND HAD NOT\ 



Si vous voulez que votre ordinateur affiche PRINT des caracteres, 
vous devez utiliser les guillemets. Mais si vous entrez 

PRINT 150 

I'ordinateur affichera le nombre 150 sur la ligne suivante sans 
aucun message d'erreur concernant I'absence des guillemets. 
Tapez 

PRINT "150" 

et il fera la meme chose. Ceci n'est vrai que pour les nombres. Si 
vous essayez de taper 

PRINT HELLO 

vous obtiendrez un zero. 



Bien que I'instruction PRINT rende le meme resultat dans les deux cas, 
il y a une difference tres importante entre les caracteres et le nombre. 
Cette difference deviendra beaucoup plus evidente lorsque vous en 
saurez plus sur la programmation. 



Une premiere instruction 



■g Questions sans reponse 

II arrivera assez souvent que vous ayez des questions au sujet du 
BASIC Applesoft dont vous ne trouverez pas directement la 
reponse dans ce livre. Par exemple, dans I'instruction 

PRINT "HELLO" 

doit-on laisser un espace apres PRINT ? 

Un simple essai vous apportera bien souvent la reponse. Taper 

PRINT"HELLO" 

et voyez ce qu'il se produit. Si vous prenez le temps de faire vous 
meme ces essais, vous vous souviendrez bien mieux de ce que 
vous avez decouvert que si, simplement, vous le lisez. 

Si essais et erreurs ne suffisent pas, reportez-vous aux annexes de 
ce manuel ou au Manuel de Reference d'Applesoft. 

Attention 

Apple He consomme moins d'electricite qu'une ampoule electrique de 
1 1 watts. S'il vous arrive de vous arreter un court instant, laissez 
I'ordinateur sous tension. Vous devrez, cependant, eteindre la console 
de visualisation car elle consomme beaucoup plus d'electricite que 
I'ordinateur. 

Si arrive a un symbole de pause, vous avez eteint votre ordinateur, 
assurez-vous, lors du redemarrage, que la disquette DOS 3.3 SYSTEM 
MASTER est bien montee dans le lecteur. 




Pause 



^^■■■■■■■HHHHHI Un mode d'affichage amusant 

Maintenant que vous commencez a connaftre I'instruction PRINT, 
quel autre essai aimeriez-vous faire ? Tapez 

L'instruction INVERSE modifie le INVERSE 
mode d'affichage video de telle 

sorte que les caracteres et actionnez . Remarquez que le caractere d'attention apparaft 

apparaissent en noir sur fond blanc. differemment : il est noir sur fond blanc. Pour voir ce que fait 

INVERSE entrez 

PRINT "HELLO, HI, BONJOUR, BUENOS DIAS" 
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NORMAL modifie le mode 
d'affichage video. Les lettres 
apparaissent en blanc sur un fond 
noir. 



N'est-ce pas joli ? Essayez d'autres instructions PRINT de votre 
choix. Remarquez que vous n'avez pas a taper INVERSE a chaque 
fois. Une fois que vous avez demande a Apple He d'utiliser le noir 
sur fond blanc, ce sera toujours le cas jusqu'a ce que vous lui 
indiquiez d'arreter. Pour cela, tapez 

NORMAL 

et toutes les instructions qui suivront seront en blanc sur fond noir. 

Une autre instruction que vous pourrez utiliser si vous souhaitez 
effacer votre ecran et ramener le curseur vers le coin superieur 
gauche de I'ecran, est 



HOME ramene le curseur au coin 
superieur gauche de la fenetre de 
visualisation et efface I'ecran. 



HOME 

Essayez-la. Ensuite entrez quelques instructions PRINT. Essayez 
HOME une nouvelle fois. Un ecran vierge est a votre disposition. 

Voici un autre essai. N'oubliez pas d'activer apres avoir tape 
une instruction. Tapez 

INVERSE 

HOME 

PRINT "MAINTENANT L'ECRAN EST VIERGE ET LES MOTS 
APPARAISSENT EN NOIR SUR FOND BLANC" 

Essayez encore quelques instructions PRINT et voyez ce qu'il se 
passe. 



Chacune de ces instructions demande a Apple He d'effectuer une 
fonction specifique : HOME efface I'ecran et ramene le curseur au coin 
superieur gauche ; INVERSE provoque I'affichage des lettres en noir sur 
fond blanc, et NORMAL ramene I'affichage sur I'ecran en lettres 
blanches sur fond noir. 



Pour faire des calculs 

A ce point de I'apprentissage, vous pouvez utiliser Apple He 
comme une simple calculatrice de bureau. 

Essayez de faire cela avec Apple He : 

PRINT 3 + 4 

La reponse, 7, apparatt sur la ligne suivante. 



Pour faire des calculs 



Apple lie connatt les cinq differentes operations arithmetiques de 
base : 

1 . L'addition est indiquee par le signe habituel plus ( + ) . 

2. La soustraction utilise le signe conventionnel moins (-). Pour 
faire un essai de soustraction, tapez 

PRINT 1086-99 

3 La multiplication est indiquee par un asterisque (*). (Si un X 
avait ete utilise pour la multiplication il aurait pu y avoir une 
confusion avec la lettre X). Pour trouver le resultat de 7 fois 8 
(au cas ou vous ne vous souviendriez plus de la reponse), 
tapez seulement 

PRINT 7 * 8 

et votre memoire sera rafraTchie. 

4. La division est indiquee par une barre oblique (/). Pour diviser 
63 par 7, tapez 

PRINT 63 / 7 

et la reponse correcte s'affichera. 

Essayez de diviser 3 par 2. Apple lie vous donne la reponse 
sous forme decimale : 1 .5. 

5 L'exponentielle est indiquee par un accent circonflexe O. II 
est souvent fastidieux de multiplier un nombre par lui-meme 
un certain nombre de fois. Au lieu d'entrer 

PRINT 4*4*4*4*4 

vous pouvez entrer I'expression plus compacte 

PRINT 4" 5 

Pour atteindre I'accent circonflexe (fleche pointant vers le 
haut), enfoncez la touche ffl tout en appuyant sur la touche 
6. 

II n'y a rien a dire de particulier sur la forme exponentielle si 
ce n'est que c'est une abreviation d'une suite de 
multiplications. En notation classique (autre que celle de 
I'ordinateur), elle est designee par 4 a la puissance 5 et on 
I'ecrit ainsi : 

4 5 
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Vous pouvez combiner plusieurs de ces operations entre elles dans 
la meme instruction. Par exemple, vous pouvez demander a 
Apple He de calculer 

PRINT 3 + 51 +9 + 400 

ou 

PRINT 3 + 5 / 9 * 4 " 2 - 1 



PRINT 3 + 51 +9 + 400 

463 

PRINT 3 + 5 / 9 * 4" 2 - 1 
10.8888889 



Les regies prevues pour un tel calcul sont decrites plus loin dans ce 
chapitre, mais vous pouvez I'essayer des maintenant si vous le 
voulez. 



Rappelez-vous, qu'Applesoft ne peut pas faire des operations avec des 
nombres entre guillemets. 

Si vous tapez 

PRINT 45.340 

votre ordinateur vous repondra 



45.34 



111 



Sans afficher le zero de gauche. Apple He n'affiche ni les zeros en tete, 
ni les zeros de gauche, c'est-a-dire, ceux qui se trouvent au 
debut du nombre a gauche du point decimal et ceux qui se 
trouvent a la fin du nombre a droite du point decimal. 

Les tres, tres petits nombres (entre environ 
.000000000000000000000000000000000000003 et 
- .000000000000000000000000000000000000003) seront 
convertis en zeros par Apple lie. Ne nous prenez pas au mot pour 
cela. Essayez-le vous meme. Une facon plus simple d'ecrire ces 
nombres est 

PRINT 3*10" - 39 et PRINT -3*10" - 39. 
Maintenant tapez 
PRINT 985788.6898 



Faire des calculs 



Oh surprise ! Les deux derniers chiffres ont disparu et le nombre a 
gauche de ces chiffres est la plus juste approximation possible 
realisable par I'ordinateur. Ce procede est appele un arrondi. 
Essayez de taper 

PRINT 788.6898 

Apple He n'a pas arrondi le nombre, mais I'a affiche exactement 
comme vous I'avez entre. II est fou, pensez-vous ? Ah, il y a 
parfois de la logique dans ce qui parait etre une folie. Les nombres 
ne sont arrondis que s'ils comportent plus de neuf chiffres. Tout 
nombre comportant moins de dix chiffres ne sera pas arrondi. 
Applesoft fait de son mieux, mais il ne peut travailler qu'avec neuf 
chiffres. 

Si vous entrez une instruction avec un nombre tres grand comme 

1234567890 

Apple He vous repondra sous la forme 



1.23456789E + 09 

Si vous affichez le nombre 10 millions (qui a 10 zeros), Apple He 
vous repondra sous la forme 



1E+10 

Les nombres 10000000000 et 1E + 10'et les nombres 
1234567890 et 1 .23456789E + 09 represented la meme valeur. 
Vraiment. Le nombre affiche par votre ordinateur est sous la forme 
appelee notation scientifique. Si vous avez besoin de tels nombres 
vous savez sans doute comment les lire. Reportez-vous au Manuel 
de Reference d' Applesoft pour des informations supplementaires ou 
si vous etes interesse par cette notation. 
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Que dire de ? 



Precedemment, vous avez actionne la touche 0apres chaque 
ligne. Vous aimeriez sans doute savoir pourquoi cette touche agit 
lorsqu'elle est frappee. La raison en est simple : sans Ie0- 
I'ordinateur ne peut pas savoir quand vous avez termine une 
instruction. Par exemple, si vous aviez tape 

PRINT 4 + 5 

et que I'ordinateur vous eut immediatement repondu 9, vous 
pourriez etre surpris de n'avoir pas pu introduire toute ['instruction 

PRINT 4 + 5 + 346 

qui donnerait un resultat totalement different. Puisque I'ordinateur 
ne peut pas, de lui-meme, detecter la fin d'une instruction, vous 
devez la lui indiquer. Ceci s'obtient en actionnant la touche 0. 

Attention 

Puisque vous avez toujours du actionner la touche Hapres avoir 
introduit une instruction, ce manuel ne vous le rappelera plus. Et, si 
vous avez bien realise tous les exercices, frapper g doit vous etes 
devenu habituel. 

Pause 



Un pas vers I'utilisation du graphique 

Jusqu'a present, nous avons joue avec des mots et des nombres. II 
est temps, maintenant, de changer de sujet. Continuez la lecture et 
vous decouvrirez quelques unes des merveilleuses possibilites 
d'Apple He. 



Pour preparer I'ecran au dessin, tapez 



L'instruction GR prepare la session GR 
de travail en mode graphique basse- 
resolution 



Quand vous entrez GR, abreviation de "graphique", vous remarquerez 
qu'un dessin s'affiche un tres court instant puis, I'ecran s'efface, et le 
curseur se deplace au bas de I'ecran. (Si votre ecran ne s'efface pas, 
c'est que vous avez sans doute oublie d'actionner g . Et n'oubliez pas 
que Ton ne vous le mentionnera plus I). 



Un pas vers I'utilisation du graphique 




L'instruction GR demande a I'ordinateur de construire une grille 
invisible de 40 colonnes verticales et de 40 lignes horizontales ou 
vous pourrez dessiner. Cet etat s'appelle le mode graphique basse 
resolution. L'instruction GR demande egalement a I'ordinateur de 
laisser assez de place dans la bas de I'ecran pour quatre lignes de 
texte, appelee fenetre de texte. GR efface aussi I'ecran et 
selectionne la couleur noire. 

Figure 1.5. Le mode 
basse-resolution 




GR efface I'ecran et selectionne la 
couleur noire 

La fenetre de texte permet 
d'afficher jusqu'a quatre lignes de 
texte en une seule fois 



Le curseur 



L'instruction GR initialise la session de travail de facon a pouvoir 
faire des dessins tres divers et de motifs visuels amusants. 
Cependant, avant de pouvoir regarder sur I'ecran les resultats de ce 
que vous avez fait, vous devez indiquer a I'ordinateur d'utiliser une 
couleur qui s'affichera sur le fond noir. Essayez done cela, en 
tapant les deux instructions suivantes : 

Pour selectionner la couleur dans le 
mode graphique basse resolution 
utilisez l'instruction COLOR = , suivie 
par un nombre entier compris entre 
et 1 5. L'instruction PLOT 
positionne une "brique" a I'endroit 
indique. 

PLOT 20,22 
PLOT 20,24 



COLOR = 15 
PLOT 20,20 

Voyez-vous la brique blanche (un petit rectangle) au milieu de 
I'ecran ? Pour placer deux autres briques le long de la meme ligne 
verticale, tapez 



■ 
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Note : Au cas ou rien n'apparaftrait sur I'ecran, il se pourrait fort bien 
que vous ayez oublie de specifier une couleur. Vous devez absolument 
le faire quel que soit le type d'ecran connecte. 

L'instruction PLOT indique a I'ordinateur ou il doit placer la brique 
de couleur en I'associant a deux nombres sur la grille invisible. Le 
premier nombre dans la troisieme instruction PLOT que vous avez 
utilise precedemment, 20, designe la 20 e des 40 colonnes. Le 
numero de la colonne est toujours en premier dans l'instruction 
PLOT. Le second nombre (vous avez indique 20, 22 et 24) designe 
le numero de la ligne. 



Figure 1.6. Comment utiliser 
l'instruction PLOT. 




Maintenant essayez de placer quelques briques sur votre ecran. 
Pouvez-vous en mettre quelques-unes dans la colonne la plus a 
gauche ? (Un conseil : le premier nombre apres PLOT devra etre 0, 
bien que le nombre 1 marche tout aussi bien). Que dire de la 
colonne a I'extreme droite ? (Reponse : le premier nombre apres 
PLOT devra etre 39). 



Un pas vers /'utilisation du graphique 



■ 



Figure 1.7. Le mode de 
numerotation de la grille du 
graphique basse resolution. 




Comme vous pouvez le voir sur la figure 1 .7, le mode de 
numerotation des colonnes debute par et s'etend jusqu'a 39, de 
gauche a droite. La numerotation des lignes s'etend egalement de 
a 39, de haut en bas de I'ecran. Ceux qui parmi vous, 
connaissent I'algebre, reconnaTtront les coordonnees cartesiennes 
dans ce mode de numerotation. Ce livre se refere aux coordonnees 
pour designer les colonnes et les lignes. Puisque la grille est deja 
divisee en 40 colonnes et 40 lignes, tout ce que vous avez a faire 
est d'indiquer les coordonnees du point qui convient dans chaque 
instruction PLOT. 

Vous choisissez la couleur des briques grace a I'instruction 
COLOR = . Apple He conservera cette couleur tant que vous ne lui 
aurez pas demande d'en changer. Essayez maintenant en entrant 

COLOR = 5 

Remarquez qu'a ce point, I'ecran n'a pas change. II faut indiquer a 
Apple He ou placer chaque brique. Tapez done 

PLOT 20,21 

Et qu'arrive-t-il ? Une brique d'un ton different devrait apparaitre 
dans la colonne deja utilisee, mais sur une autre ligne. Poursuivez 
par 

PLOT 20,23 
PLOT 20,0 
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Deux autres briques devraient apparaitre dans la meme colonne. 

Precedemment, si vous avez realise les exercices, vous avez fait 
apparaitre sur I'ecran des briques de deux tons differents. 
Comment faut-il proceder ? 

II y a 16 nombres associes a COLOR = dans Applesoft. Regardez la 
figure 1-8 pour voir a quel nombre est associe telle couleur. 



Figure 1.8. Noms des couleurs 
d'Applesoft et nombres associes 
dans COLOR 



noir 



magenta 
bleu fonce 
violet 
gris fonce 
gris 
bleu 

bleu clair 




Figure 1.9. Groupes de couleurs. 
Pour obtenir un bon contraste sur 
une console noir et blanc ou au 
phosphore vert, utilisez un nombre 
de chaque groupe. 



Gris fonce : 1, 2, 4, 8 

Gris : 5, 10 

Gris clair : 3, 6, 9, 12 

Gris tres clair : 7, 1 1, 13, 14 

Blanc : 1 5 



Si vous utilisez une console noir et blanc ou au phosphore vert, il y 
a cinq groupes de couleurs qui vous permettront d'obtenir un bon 
contraste sur I'ecran. Toutes les seize couleurs peuvent etre 
utilisees et vous devez vous sentir totalement libre de vous en 
servir. 

Un pas vers I' utilisation du graphique 



H 



Pour ceux qui possedent un teTeviseur couleur : vous pouvez connecter 
un televiseur couleur a Apple He grace a un modulateur de frequence 
radio . Tous les exemples de ce manuel, relatifs au graphisme, peuvent 
etre joliment realises en couleur. Vous n'aurez pas a vous limiter aux 
groupes de couleurs car les 16 couleurs se marient bien sur un ecran 
couleur. 



Des briques apparaissent sur votre ecran, placees grace a 
I'instruction COLOR = 1 5 et COLOR = 5. Essayez ensuite ces 
instructions pour faire apparaitre de nouveaux tons : 

COLOR - 3 
PLOT 2 1 ,0 
PLOT 21,20 

COLON - 1 
PLOT 22,22 
PLOT 22,25 
PLOT 22,26 

Pour comprendre pourquoi les couleurs de nombres 1, 2, 4 et 8 
font partie du meme groupe, essayez de placer des briques de ces 
differentes couleurs cote a cote. Sur un ecran noir et blanc ou au 
phosphore vert, vous ne detecterez pas de grandes differences 
entre elles. Elles sont, bien sur, tres differentes sur un ecran 
couleur (magenta, bleu fonce, gris fonce et brun). Poursuivez par 

COLOR - 
PLOT 22,27 

Rien ne se passe, n'est-ce pas ? Jetez un coup d'ceil sur la Figure 
1-8 pour en comprendre la raison. II se produira la meme chose si 
vous entrez I'instruction GR sans indiquer une couleur particuliere. 
Ceci, parce que la couleur est initialement a zero ou au noir. Vous 
en souvenez-vous ? 

Maintenant entrez quelques instructions COLOR = et PLOT. Et 
recommencez I'exercice jusqu'a ce que cela vous devienne familier. 

Si vous voulez effacer I'ecran et entrer d'autres instructions PLOT, 
tapez 

GR 



Quand vous etes en mode graphique, HOME efface seulement la 
fenetre de visualisation. GR doit etre utilise pour blanchir I'espace ecran 
servant au graphisme. 
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Les messages d'erreurs PLOT 



II y a deux messages d'erreurs qui surviennent souvent lorsque 
vous utilisez I'instruction PLOT. Vous savez, sans doute, deja que 
si vous tapez 

PLAT 

ou 

PLOP 

au lieu de 

PLOT 

Vous obtiendrez le message 



?SYNTAX ERROR 

Un message d'erreur different s'affiche si vous utilisez un nombre 
plus grand ou plus petit que ceux qui sont autorises pour definir les 
coordonnees dans PLOT. Tapez 

PLOT 1 3,85 

et le message apparaTt 

7ILLEGAL QUANTITY ERROR 



Ce message signifie que vous avez essaye d'atteindre un point en 
dehors des limites de I'ecran. Le nombre le plus grand que vous 
pouvez utiliser dans I'instruction PLOT est 39 car les coordonnees 
vont de a 39. 



Exception : II y a, en fait, plusieurs facons d'acceder a un numero de 
ligne superieur a 39. Elles sont explicitees dans le manuel de reference 
d'Applesoft. 



Essayer de donner une valeur negative dans I'instruction PLOT est une 
autre facon d'obtenir le 



7IL.LEGAL QUANTITY ERROR 



message. 
Pause 



Les messages d'erreur de PLOT 



Tracer des lignes 



Preparer votre ecran pour de nouveaux graphismes en tapant 

GR 

COLOR = 1 

Vous vous etes sans doute rendu compte, a ce stade de I'etude, 
qu'il faut un grand nombre d'instructions PLOT pour tracer une 
ligne sur I'ecran. II vous faudra, par exemple, 40 instructions pour 
tracer une ligne horizontale barrant le milieu de I'ecran ; 

PLOT 0,20 
PLOT 1,20 
PLOT 2,20 

et ainsi de suite jusqu'a 

PLOT 39,20 

Cependant, il y a une facon plus simple de tracer des lignes 
horizontales. Tapez simplement 

L'instruction HLIN permet de tracer HLIN 0,39 AT 20 
des lignes horizontales en mode 

graphique basse resolution. Et c < est f a j t . VO(JS Q btenez instantanement une ligne de la colonne a 

la colonne 39 sur la ligne 20. 

Pour tracer une ligne horizontale dans une autre couleur, juste en 
dessous de la premiere, entrez 

COLOR = 7 
HLIN 0,39 AT 21 
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3HLIN @,39 AT 21 
1 



Figure 1-10. L'mstruction HLIN 



Maintenant vous pouvez trouver comment tracer une troisieme 
ligne d'un autre ton sur la ligne 22. Mais, cette fois, elle doit 
debuter en colonne 10 pour se terminer en colonne 30. 

Pour comprendre I'instruction HUN, examinez avec soin I'ordre des 
nombres qui suivent HLIN. La syntaxe, ou les regies d'ecriture de 
I'instruction, necessitent la presence de trois nombres dans un 
certain ordre. La troisieme ligne, par exemple, s'etend de la 
colonne 10 a la colonne 30 sur la 22 e ligne et est obtenue par 
I'instruction de la Figure 1-11. 



Figure 1-11. La syntaxe de HLIN 



HLIN 10, 30 AT 22 

Du numero de colonne 10 (a gauche) au numero de colonne 30 (a droite) 
sur la ligne de numero 22. 



Tracer des lignes 



Pour voir comment les instructions PLOT et HLIN peuvent etre 
utilisees conjointement, essayez ce qui suit : 



COLOR = 8 
HLIN 29,39 AT 35 
HLIN 29,39 AT 37 
COLOR = 10 
PLOT 29,36 
PLOT 39,36 

II existe pour les colonnes une instruction similaire a celle utilisee 
pour les lignes horizontales. Pour tracer un autre rectangle, encore 
plus grand, entrez 

Dans les graphiques basse 
resolution, VLIN trace une ligne 

verticale dans la couleur indiquee COLOR =15 

par la plus recente indication VLIN 20 AT 

COLOR = VLIN 0^20 AT 15 

COLOR = 5 

HLIN 0,15 AT 

HLIN 1,14 AT 20 

Remarquez qu'au point ou les lignes horizontales croisent les lignes 
verticales, c'est la nouvelle couleur qui reste affichee alors que 
I'ancienne disparait. EntraTnez-vous a tracer d'autre lignes 
verticales. Puis, pour effacer I'ecran, utilisez I'instruction GR. 

Maintenant, testez vos dons pour les lignes horizontales et 
verticales en tracant la bordure de I'ecran en cinq instructions 
seulement. Dessinez un parcours sur I'ecran. Amusez-vous avec les 
instructions PLOT, HLIN et VLIN jusqu'a ce que vous arriviez a 
placer les lignes exactement ou vous le voulez. 

Maintenant voici un test. Regardez la Figure 1-12. Trouvez les 
coordonnees de la grille permettant de tracer "Hi" * sur votre 
ecran avec une instruction HLIN et trois instructions VLIN. Debutez 
par 

COLOR = 3 
VLIN 5,25 AT 10 

et trouvez le reste. Faites le point du "\" a I'aide de I'instruction 
PLOT. Vous pouvez, si vous le voulez, ajouter un point 
d'exclamation en colonne 28 (pour animer le tout). 

(*) Hi est une interjection anglaise pour dire bonjour. 
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Figure 1-12. L'utilisation des 
coordonnees de la grille du mode 
graphique basse resolution 



L'instruction TEXT initialise I'ecran 
en mode texte (I'alternative du 
mode graphique) : 40 caracteres par 
ligne et 24 lignes. S'il est utilise 
pour sortir du mode graphique il 
vaut mieux I'utiliser conjointement 
avec I'intruction HOME. 




Des que vous aurez termine vos essais en mode graphique, vous 
pourrez ramener I'ordinateur en mode texte afin de pouvoir affecter 
I'ecran a vos programmes. En tapant 

TEXT 



vous verrez apparaTtre des symboles bizarres sur tout I'ecran. Le 
terme technique qui le decrit est garbage. C'est I'indication 
qu'Applesoft passe du mode graphique au mode texte. Pour 
supprimer le garbage de votre ecran, faites suivre l'instruction 
TEXT par une instruction HOME. Comme vous le savez deja, 
HOME efface tout texte de votre ecran. 

Bien que ce manuel abandonne I'etude du mode graphique pour un 
court moment, assurez-vous, avant de continuer, qu'Apple He a 
bien ete ramene en mode texte. 



Pause 



Tracer des lignes 
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Variables et autres possibility de I'ordinateur 



II y a, dans la memoire principale de votre Apple lie, un grand 
nombre de zones particulieres. Dans chacune de ces zones, vous 
pouvez ranger soit un nombre, soit le resultat d'une multiplication, 
soit des mots, soit encore une suite de caracteres. Vous y arriverez 
par I'intermediaire de symboles representatifs des differentes 
adresses des zones de rangement. 

C'est comparable a la memorisation d'un nombre sur une simple 
calculatrice en vue d'une utilisation ulterieure. Habituellement sur ^ 
une calculatrice, on y parvient en actionnant la touche "memoire". 
Dans Apple lie, comme il y a bien plus de zones memoires que 
dans une calculatrice, il faut donner un nom a chaque zone. 

Supposons que vous vouliez sauvegarder le nombre 77. Si vous 
voulez baptiser la zone memoire A, vous le demanderez a 
I'ordinateur en entrant 

L'instruction LET sert a definir une 

variable. LET A = 77 



Le nombre, ou sa valeur, 77, n'est pas affiche. II est range dans la 
zone que vous avez appele A. Maintenant, si vous tapez 

Si ^instruction LET A = 77 a PRINT A 

disparu de votre ecran, c'est que 

vous avez oublie de quitter le mode I'ordinateur affichera la valeur de la variable A, qui est 77. 
graphique par l'instruction TEXT. Si 

vous avez des signes Continuez en tapant les deux instructions precedentes. 

incomprehensibles sur I'ecran, c est 
que vous avez oublie d'effacer 
I'ecran avec l'instruction HOME. 



LET A = 



Figure 1-13. La definition d'une 
variable avec LET. Une variable est 
un symbole representatif d'une 
adresse memoire. Vous devez vous 
I'imaginer comme une zone ou une 
valeur, par exemple 77, serait 
rangee. 



Cette instruction definit une varia 

Ce symbole represente une adresse 
ou zone de rangement, dans la 
memoire 

C'est la valeur qui est memorisee 
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Une variable peut avoir presque n'importe quel nom pourvu qu'elle 
debute par une lettre. Par exemple 

LET A = 77 

LET ROUGE3 = 77 

LET VETEMENT = 77 

Chacune de ces variables represente une adresse differente de la 
memoire. Elles memorisent toutes la meme valeur, 77. Maintenant 
si vous tapez 



VETEMENT 



100 



et si vous affichez la valeur de VETEMENT, vous obtenez 100, 
n'est-ce pas ? 77 a disparu et vous avez affecte une nouvelle 
valeur a VETEMENT. 



Tant que vous mettrez une nouvelle valeur dans une variable, 
I'ancienne valeur sera effacee de la memoire. 



Cependant, les variables A et ROUGE3 contiennent toujours 77. 
Essayez de taper 

PRINT ROUGE3 

pour voir. La meme chose est-elle vraie pour la variable A ? 

II se peut que vous ayez remarque que dans I'instruction 
VETEMENT = 100, vous n'avez pas tape LET. LET est facultatif 
lorsqu'il s'agit de designer une variable. En d'autres termes, les 
instructions 

LET A = 45 

et 

A = 45 

donnent le meme resultat. II est parfois plus facile de reconnaitre 
une variable, a la premiere lecture d'Applesoft, si elle est precedee 
de LET. Mais ce n'est pas une obligation. 
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Vous devez sans doute vous dire, en pensant a la fatigue de vos 
doigts, qu'il vaut mieux utiliser des noms abreges comme noms de 
variables. Vous decouvrirez egalement que certains noms ne sont 
pas autorises car ils ont, en eux-memes, un sens particulier pour 
Applesoft. On les appelle les mots reserves. L'un d'entre eux est 
COLOR. Ainsi, un nom de variable ne devra jamais comporter cette 
suite de lettres dans son orthographe. Si vous tapez 

THISCOLOR = 6 

ou 

COLORFUL = 9 

Vous obtenez le message d'erreur 7SYNTAX ERROR qui vous 
signale que vous avez inopinement forme un nom avec un mot 
reserve. Ce n'est pas grave. Choisissez un autre nom. En prenant 
un peu de liberte avec I'orthographe des mots (en anglais dans cet 
exemple) vous pourrez renommer les variables de facon qu'elles 
gardent tout leur caractere mnemotechnique : COLOURFUL. 

Une liste des mots reserves, qui ne peuvent pas etre utilises seuls 
ou en formation d'un nom de variable, se trouve dans I'annexe B. 
Le Manuel de Reference a" Applesoft contient d'autres 
commentaires sur les variables. 



Mode de reconnaissance d'une variable 

Applesoft distingue deux variables en comparant les deux premiers 
caracteres formant leur nom. 

Pour bien le comprendre, tapez 

OISEAU = 11 
PRINT OISEAU 

Est-ce bon ? Poursuivez par 

PRINT OISILLON 
Qu'arrive-t-il ? Tapez 

PRINT OIE 

Tous ces noms commencent par 01. Ainsi les noms OISEAU, 
OISILLON et OIE se rapportent tous a la meme variable. 
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Applesoft interprete de facon differente les instructions 

PRINT CHAT 
et 

PRINT "CHAT" 

Introduisez-les. Que se passe-t-il ? 

Dans la premiere instruction, le mot CHAT est le nom d'une 
variable alors que dans la deuxieme le mot CHAT est la suite des 
lettres permettant d'orthographier le nom de cet animal. C'est un 
exemple d'utilisation des guillemets par Applesoft. 



Si vous oubliez les guillemets dans I'instruction PRINT, Applesoft 
considerera que le mot, ou la lettre, est une variable et tentera 
d'afficher la valeur de cette variable. 



A ce point de I'etude, vous n'avez utilise les variables que pour 
memoriser un nombre. Vous pouvez egalement les utiliser pour 
memoriser le resultat d'une operation. Entrez les instructions : 

A = 4 + 5 
PRINT A 

La valeur de A est 9, n'est-ce pas ? Maintenant vous pouvez 
utiliser A dans une autre operation. Par exemple, tapez 

PRINT A + 2 

Est-ce bien la reponse escomptee ? Tapez quelques instructions 
supplementaires qui utilisent la variable A. 



Applesoft extrait tout ce qui se trouve a droite du signe ( = ), 
I'interprete, le traite et en range le resultat dans la variable se trouvant 
a gauche du signe ( = ). 
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Maintenant, supposons que PAIN ait la valeur 28 et que vous 
vouliez augmenter cette valeur de 5. Si vous entrez : 

PAIN = 28 
PRINT PAIN 
PRINT PAIN + 5 

vous obtiendrez 33. Mais si vous tapez encore 

PRINT PAIN 

Applesoft vous redonnera la valeur initiale de la variable PAIN. Un 
moyen d'augmenter la valeur de la variable en memoire est de 
taper 

PAIN = PAIN + 5 
PRINT PAIN 

[.'instruction PAIN = PAIN + 5 peut vous paraTtre illogique sauf si 
vous vous rappelez qu'Applesoft ne rend pas obligatoire I'utilisation 
du verbe LET (qui veut dire "faire" en francais). Ce que vous 
voulez reellement dire est "faire que la variable PAIN soit 
maintenant egale a I'ancienne valeur de PAIN augmentee de 5". 

Ainsi PAIN contiendra une nouvelle valeur — tant que vous ne lui 
aurez pas assigne une autre valeur. Entrez les instructions qui 
suivent en respectant I'ordre : 

PAIN = 2 
PRINT PAIN 
PAIN = PAIN + 3 
PRINT PAIN 
PAIN = PAIN * 6 
PRINT PAIN 
PAIN = PAIN / 10 
PRINT PAIN 

A Tissue de cette sequence d'instructions, vous devriez voir 
affichee la valeur 3. Est-ce bon ? Est-ce bien ce que vous 
attendiez ? 



Contrairement a la regie mathematique que vous avez pu connaitre a 
I'ecole, a savoir : X est toujours egal a X, I'ordinateur introduit la notion 
de variation de valeur d'une variable. Dans I'instruction X = X + 1 , le 
signe egal signifie "prendre la valeur" ou "etre assigne a la valeur". 
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Apple He peut memoriser toute nouvelle valeur de la variable (PAIN) 
des qu'elle est calculee ou assignee. Ce n'est pas la peine de taper 
PRINT PAIN a chaque fois. Pour vous en convaincre, tapez done 

PAIN = 2 
PAIN = PAIN + 3 
PAIN = PAIN * 6 
PAIN = PAIN / 10 
PRINT PAIN 

Regardez la sequence qui suit, Quel doit etre le resultat final ? 
Essayez. 

POMMES = 55 
BANANES = 11 

QUOTIENT = POMMES / BANANES 
PRINT QUOTIENT 

Cet exemple illustre le fait suivant : des que vous avez memorise 
plusieurs variables dans Apple //, vous pouvez faire des operations 
sur ces variables. Les pommes ne peuvent pas, jusqu'a present 
etre divisees par des bananes, mais Applesoft reconnaft les 
variables et divise leur valeur. 

Cette section a explique le mode de rangement des noms et les 
resultats des operations entre variables. Vous devez toujours avoir 
present a I'esprit qu'il est egalement possible de ranger des mots 
ou des suites de caracteres dans des variables. On en parlera a 
nouveau au cours du Chapitre 5. 



Un resume des regies concernant les variables : 

1 . Une variable est un symbole representant I'adresse en 
memoire. 

2. ^instruction LET est utilisee pour definir une variable. 

3. LET est facultatif ; LET A = 23 et A = 23 a le meme effet. 

4. Applesoft extrait tout ce qui est a droite du signe egal, 
I'interprete, le traite et range le resultat dans la variable qui est 
a gauche du signe egal. 
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7. 



Un nom de variable doit commencer par une lettre. C'est une 
bonne habitude de donner des noms significatifs a vos 
variables pour faciliter leur identification. 

Applesoft ne differencie une variable d'une autre qu'en 
analysant les deux premiers caracteres de leur nom. 

Les verbes d'Applesoft et quelques autres mots sont reserves 
et ne peuvent pas etre utilises comme noms de variables. 



Pause 



Pour gagner beaucoup de temps 

Vous vous etes sans doute apercu que I'instruction PRINT est 
souvent utilisee dans Applesoft. 

Cependant, vous allez apprendre quelque chose qui va vous faire 
gagner beaucoup de temps : un point d'interrogation peut etre 
utilise a la place de PRINT. En fait ? et PRINT sont identiques pour 
Applesoft. Faites-en I'essai en tapant ? "EFFICACE !" 



Hierarchie entre operateurs 

Maintenant que vous utilisez Apple lie pour faire des operations, 
vous devez apprendre dans quel ordre, ou hierarchie, Applesoft 
interprete vos instructions. Le resultat du calcul suivant 



PRINT 4 



2 



Figure 1-14. Exemple de priorite. La 
division est faite en premier. 
L'expression devient alors 4 + 4 et 
I'addition est realisee. 



sera-t il 6 ou 8 ? Cela depend de la premiere operation realisee par 
Applesoft. Si Applesoft ajoute 4 a 8, puis divise le resultat (12) par 
2, le resultat final sera 6. Si Applesoft divise 8 par 2, puis ajoute 4, 
le resultat final sera 8. Regardez la figure 1-14 pour voir dans quel 
ordre agit Applesoft. 



P R I N I 
PRINT 
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Voici d'autres exemples 



1 . Quand un signe moins est utilise pour definir un nombre, on 
I'appelle un signe moins. Dans I'exemple suivant 

PRINT -3 + 2 

Applesoft commence a convertir le nombre immediatement 
precede du signe moins en nombre negatif avant d'effectuer 
les operations arithmetiques. Le resultat de - 3 + 2 est - 1 . Si 
I'addition avait ete faite en premier, -3 + 2 aurait donne -5. 
Mais ce n'est pas le cas. Un autre exemple 

NOMBRE = 6 

PRINT -NOMBRE + 10 

La reponse est 4. (Notez bien, cependant, que dans 
I'expression arithmetique 5-3, le signe - represente la 
soustraction et non un nombre negatif). 

2. Apres avoir traite tous les nombres negatifs, Applesoft execute 
les exponentielles. L'instruction 

PRINT 4 + 3 " 2 

est evaluee en multipliant d'abord 3 par lui-meme (3*3 = 9) 
et en ajoutant 4 au resultat obtenu ce qui donne 1 3 comme 
resultat final. Quand il y a plusieurs formes exponentielles dans 
I'expression, celles-ci sont executees de la gauche vers la 
droite, ainsi 

PRINT 2 " 3 " 2 

est evalue en multipliant 2 par lui-meme trois fois (2 * 2 * 2), 
ce qui donne 8, puis en multipliant 8 par lui-meme (8 * 8). La 
reponse est 64. 

3. Une fois les formes exponentielles traitees, toutes les 
multiplications et les divisions sont faites, de la gauche vers la 
droite. Les operateurs de meme priorite sont toujours traites de 
la gauche vers la droite. La multiplication (*) et la division (/) 
ont la meme priorite. 

4. Addition et soustraction sont faites en suivant, avec la meme 
priorite. 

Ne retenez pas par cceur la hierarchie entre les operateurs. Vous 
pourrez toujours vous reporter a ces pages lorsque vous en aurez 
besoin. 
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Figure 1-15. Ordre de traitement des 
operateurs par Applesoft pour 
evaluer les expressions arithmetique 



Premier : 



Unaire, ou signe moins utilise pour definir un 
nombre negatif 



Second : 



Les formes exponentielles de gauche a droite 



Troisieme : * / Multiplication et division de gauche a droite 
Quatrieme : + - Addition et soustraction de gauche a droite 



Quelques expressions arithmetiques a evaluer sont presentees ci- 
apres. Evaluez-les d'abord vous-memes puis avec Apple He. Si 
votre reponse differe de celle de I'ordinateur, essayez de 
comprendre pourquoi. 

N'oubliez pas de faire preceder chaque expression de ? ou de 
PRINT. Faites les exemples un par un, en comparant votre reponse 
a celle du calculateur, avant de poursuivre. (Sauf si vous avez deja 
compris la facon dont le calculateur procede). 

PRINT 4 + 6-2+1 

PRINT 5-4/2 

PRINT 20 / 2 * 5 

PRINT 6* -2 + 6/ 3 + 8 

PRINT 2 " 2 ~ 3 + 2 " 3 

PRINT 8*2/2 + 3*2"2*1 

Les reponses ne sont pas donnees dans ce livre. Apple lie vous 
donnera la bonne reponse. Si cela vous a plu, essayez d'autres 
expressions de votre choix. Si non, tenez bon ! 

Des parentheses 

Imaginons que vous vouliez diviser 12 par le resultat de 4 + 2. Si 
vous tapez 

PRINT 12/4+2 

vous obtiendrez 5 comme reponse. Mais ce n'est pas cela que 
vous souhaitez. Pour que vos desirs deviennent realite, utilisez les 
parentheses pour modifier la hierarchie de calcul. Tapez 

PRINT 12/(4 + 2) 
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La regie suivie par Applesoft est simple ; il traite d'abord ce qui est 
entre parenthese. Si des parentheses sont incluses entre d'autre 
parentheses, Applesoft evalue d'abord ce qui se trouve entre les 
plus proches. Voici un exemple : 

PRINT 12 / (3 + (1 + 2) " 2) 

Dans I'expression : 

12 / (3 + 3 " 2) 

Applesoft utilise alors les regies de priorite entre operateurs pour 
evaluer : 3 + 3 " 2 soit 3 + 9, ou 1 2 et enfin 12/12 soit 1 . 

Dans le cas ou il y a plus d'un couple de parentheses, par exemple 
(9 + 4) * (1 + 2), Applesoft evalue les expressions entre chaque 
couple de parentheses, commencant a gauche et continuant sur la 
droite. L'expression devient 13*3, soit 39. 

Voici quelques autres expressions a evaluer. N'oubliez pas que 
vous pouvez taper un point d'interrogation (?) a la place de PRINT. 
Une fois n'est pas coutume : la plupart de ces regies sur la 
hierarchie des operateurs et sur les parentheses sont respectees 
par I'ensemble des constructeurs du monde entier et pas seulement 
par Apple. 

PRINT (44 / 2) + 2 

PRINT 100 / (200 / (1 * (9 - 5!)) 

PRINT 32/(1 + (7 / 3) + (5 / 4)) 

Pause 



Des parentheses 



Resume du chapitre 

Voici tout ce que vous avez appris au cours de ce chapitre. 
Impressionnant, n'est-ce pas ? Chaque groupe reprend I'ensemble 
des termes de ce chapitre et dans I'ordre de leur apparition. La 
definition des instructions se trouve dans I'Annexe A. La definition 
des termes se trouve dans le Glossaire. 



Instructions 
Applesoft 

PRINT 
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HOME 
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PLOT 

HLIN 

VLIN 

TEXT 
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Chapitre 2 



Premiers elements 
de programmation 



Lorsqu'un ordinateur fonctionne d'apres les instructions que vous 
lui avez donnees, on dit qu'il execute les instructions. Jusqu'a 
present vous tapiez 

PRINT 3 + 4 

et, lorsque vous pressiez , I'ordinateur faisait ce que vous lui 
demandiez immediatement. Ce mode d'execution est appele 
execution immediate. La plupart des instructions de I'Applesoft 
peuvent etre essayees en execution immediate. 

Mais comment faire maintenant si vous voulez impressionner vos 
amis avec la magie de I'ordinateur ? Ou si vous voulez ecrire 
quelques instructions maintenant, puis continuer plus tard ? Pour 
cela vous devez pouvoir memoriser les instructions pour les 
executer plus tard. Ce mode de travail est appele V execution 
differee. (ou mode programme). 

Mode programme 

Tout d'abord assurez-vous que la memoire de I'ordinateur est vide, 
tapez : 

NEW 

Ensuite tapez la ligne suivante : 

100 PRINT "MY FAVORITE FOOD IS ARTICHOKES" 

Si vous pressez sur , rien n'apparait sur I'ecran. Si vous 
pressez a nouveau, le curseur descend d'une ligne sur 
I'ecran, mais votre instruction n'est toujours pas executee. 



La commande NEW efface la 
memoire centrale de I'Apple He et 
doit etre utilisee chaque fois que 
vous commencez un nouveau 
programme 
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1NEW 
]100 PRINT 



'MY FAVORITE FOOD IS ARTICHOKES' 



La raison de ce fonctionnement est simple : lorsque vous avez tape 
100, vous avez donne un numero de ligne a I'instruction et indique a 
I'ordinateur que vous vouliez une execution differee. L' Apple He garde 
la ligne 100 dans sa memoire jusqu'a ce que vous lui demandiez le 
contraire (par exemple si vous coupez le courant de votre Apple lie, la 
ligne 100 sera perdue). 

Bien sur, vous ne voudrez sans doute pas retarder indefiniment 
I'execution de cette instruction. Vous vous demandez aussi 
certainement comment vous pouvez vous assurer que votre ligne 100 
est bien la. Pour afficher sur votre ecran le contenu de la memoire de 
I'Apple He, tapez : 



La commande LIST affiche les lignes LIST 
de programme qui sont dans la 

memoire centrale de I'Apple He. e t, sauf si vous avez fait une faute de frappe. 



LIST 

100 PRINT "MY FAVORITE FOOD IS ARTICHOKES" 



apparaTt sur I'ecran. 



LIST commande a I'ordinateur d'afficher toutes les lignes 
numerotees qu'il a en memoire. Pour indiquer a I'ordinateur 
d'executer la ligne 100, tapez : 

La commande RUN demande a RUN 
I'ordinateur d'executer les 

instructions qui sont en memoire. e t la chaine 



MY FAVORITE FOOD IS ARTICHOKES 



apparait sur I'ecran. 

Notez soigneusement les differences entre la ligne affichee par la 
commande LIST et le texte affiche lors de I'execution. Vous 
remarquerez que le numero de ligne 100 a disparu ainsi que PRINT. 
Comme vous vous en souvenez, I'instruction PRINT est utilisee 
pour afficher des informations sur I'ecran. Lorsque vous faites 
executer la ligne 100, seul le texte compris entre les guillemets est 
affiche. Vous pouvez afficher et executer la ligne 100 autant de 
fois que vous le desirez. 



38 



Premiers elements de programmation 



3100 PRINT "MY FAUORITE FOOD IS ART I CHOK 
ES" 

]L 1ST 

1@0 PRINT "MY FAUORITE FOOD IS A 
RTICHOKES" 

□ RUN 

MY FAUORITE FOOD IS ARTICHOKES 
3LIST 

ISO PRINT "MY FAUORITE FOOD IS A 
K 7 1 CHOKES H 

1 RUN 

MY FAUORITE FOOD IS ARTICHOKES 
X 



Illustration 2-1. Utilisation de LIST 
et RUN en execution differee. 



Vous avez besoin d'un certain temps pour bien comprendre la 
difference entre ce que vous voyez sur I'ecran, ce qui est dans la 
memoire centrale et ce qui est conserve sur un disque. Au fur et a 
mesure que vous travaillerez avec votre Apple He et ce manuel, cette 
difference deviendra de plus en plus claire. Le Guide de I'Utilisateur 
Apple lie contient egalement des informations complementaires sur ce 
sujet. 



Pour voir ce qui se passe lorsque vous entrez une autre instruction 
avec le numero de ligne 100, tapez : 

100 PRINT "THE SUM OF 3 + 4 IS" 
110 PRINT 3 + 4 

L'ancienne ligne 100 a ete remplacee et n'est plus dans la 
memoire. Pour le verifier tapez LIST. Puis tapez : 

RUN 

Qu'obtenez vous ? Et maintenant si vous tapez : 

NEW 
puis 

LIST 

La memoire de I'ordinateur a ete effacee, les deux lignes 100 et 
1 10 sont perdues. Si vous tapez : 

RUN 



rien n'est execute puisqu'il n'y a rien dans la memoire. Vous devez 
donner a I'ordinateur de nouvelles instructions, tapez : 
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2 PRINT "P" 
1 PRINT "A" 
4 PRINT "E" 

3 PRINT "L" 

Affichez maintenant ces instructions. Remarquez que I'ordinateur 
memorise les instructions dans I'ordre croissant des numeros de 
ligne : il a done reordonne les instructions que vous lui avez 
donnees et affiche : 



1 PRINT "A" 

2 PRINT "P" 

3 PRINT "L" 

4 PRINT "E" 



Lorsque vous faites executer ces instructions vous observez que 
I'ordinateur execute aussi les instructions dans I'ordre croissant des 
numeros de ligne. Cela n'est pas suffisant : il manque un P. Pour 
I'ajouter, afin que I'ordinateur affiche : 




vous devez retaper les lignes 3 et 4 en les numerotant 4 et 5 et 
vous devez ajouter une nouvelle ligne 3. Pour faire ces corrections, 
tapez : 



3 PRINT "P" 

4 PRINT "L" 

5 PRINT "E" 



Pour voir ce qui s'est passe, utilisez la commande LIST puis la 
commande RUN. 



Felicitations ! vous venez d'ecrire un programme. Assembler des 
suites d'instructions precedees par des numeros de ligne est le B.A 
BA de la programmation. Un programme est une sequence (ce sont 
les numeros de ligne qui assurent cet ordre) memorisee 
d'instructions (comme PRINT) qui font faire, a un ordinateur, une 
fonction donnee (dans ce cas : afficher APPLE sur I'ecran). 

Lorsqu'un P a ete oublie dans APLE, il a ete penible de retaper les 
lignes 3 et 4. Heureusement, il existe une methode plus facile qui 
consiste a programmer en laissant des intervalles entre les numeros 
de ligne et avant le premier numero. Si, par exemple, les numeros 
avaient ete 10, 20, 30, 40, vous auriez pu rajouter le P manquant 
avec I'instruction 1 5. 
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Un des avantages du mode programme est de vous permettre 
d'ajouter ou de modifier des instructions sans avoir a retaper tout 
le programme chaque fois. Par exemple, tapez : 

NEW 

pour eliminer les anciennes instructions, puis : 

100 PRINT "C" 
110 PRINT "T" 

Lorsque vous faites executer ce programme, il n'affiche pas tout a 
fait CAT verticalement mais vous pouvez le modifier simplement er 
tapant : 

105 PRINT "A" 

Affichez et executez a nouveau ce programme. 

Voila maintenant une plus longue liste d'instructions a essayer : 

NEW 

10 HOME 

20 PRINT "MY APPLE GIVES MESSAGES :" 
30 PRINT 

40 PRINT "HI, THERE, PROGRAMMER I" 
50 PRINT 

60 PRINT "MY APPLE DOES COMPUTATIONS :" 
70 PRINT 
•80 PRINT 60/12 
90 PRINT 4 " 5 

Le mode programme presente I'avantage de permettre de stocker 
plusieurs instructions a la fois, a condition qu'elles aient toutes un 
numero de ligne different. 

Vous voulez certainement voir tout de suite le resultat de ces 
instructions, tapez : 

RUN 

et regardez le resultat qui apparait : 
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MY APPLE GIVES MESSAGES : 
Hi, THERE, PROGRAMMER ! 
MY APPLE DOES COMPUTATION 



5 

1024 



Est-ce que votre ecran ressemble a cela ? Sinon, affichez votre 
pSgramme pour voir ses erreurs (Remarquez que vous pouvez 
aXer votre programme avant ou apres I'execution). Void une 
liste de points a verifier lorsque vous affichez un programme . 

• Est-ce que toutes les lignes ont des numeros differents ? 

. Est-ce que vous avez orthographie PRINT correctement ? 

• Est-ce que vous avez pense a tous les guillemets dans les 
instructions PRINT (les lignes 30, 50 et 70 'ntroduisent 

I simplement des lignes blanches entre les textes affiches 

comme le ferait le retour chariot d'une machine a ecrire). 

Si vous devez modifier une ligne, retapez-le '.simplement .Ervsuite, 
affichez a nouveau le programme pour verifier que tout est co rect. 
I (Dans Iq prochain Chapitre, vous apprendrez des methodes plus 

rapides pour corriger des lignes de programme). 

I Dans cette section, vous avez appris plusieurs commandes qui 

vous permettent de travailler avec des programmes complets. Elles 
sont resumees dans I'illustration 2-2. 



Illustration 2-2. Les fonctions des NEW Efface le programme de la memoire de I'ordmateur. 

Sides NEW, UST e, RUN ^ZZ^Z^ZS^SZ"^ pa,* 

d'un disque. 

LISj Affiche sur I'ecran le programme qui est dans la 

memoire. 

RUN Fait executer par I'ordinateur le programme qui est dans 
la memoire en commencant par I'mstruction qu, a le plus 
petit numero de ligne (il est aussi possible de 
commencer I'execution avec n'importe quel autre 
numero de ligne). 

Pause 

Boucles : 1'instruction GOTO 

SuDDOSons que vous vouliez afficher tous les nombres de 1 a 200 
en afficSant un nombre par ligne. Une facon evidente de le fa.re est 
de taper : 

100 PRINT 1 
110 PRINT 2 
120 PRINT 3 
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et ainsi de suite. Mais cette methode necessiterait 200 instructions 
et done une longue frappe attentive ! Heureusement, il y a une 
solution plus rapide. Vous pouvez afficher les entiers positifs avec 
5 instructions seulement. 








mm 




■ 





L'execution de I'instruction GOTO, 
provoque le branchement a la ligne 
indiquee. Cette instruction est 
utilisee pour creer des boucles dans 
un programme. 



Illustration 2-3. L'instruction GOTO 



NEW 

100 N = 1 
110 PRINT N 
120 N = N + 1 
130 GOTO 110 

Avant de faire executer ce programme, etudiez la figure 2-3 pour 
comprendre comment le programme fonctionne. 



La ligne 100 affecte 1 a la variable 
N. Voir "Variables et autres 
facilites", Chapitre 1. 



La ligne 1 10 affiche la valeur de 



La ligne 120 augmente de 1 la 
valeur de N. 

La ligne 130 provoque le retour du 
programme a la ligne 110. La ligne 
110 affiche N, la ligne 120 
incremente la valeur de N et la ligne 
1 30 renvoie a la ligne 1 1 et ainsi 
de suite. Chaque fois une nouvelle 
valeur de N est affichee. 




1 00 N = 1 
110 PRINT N 
120 N = N + 1 
130 GOTO 110 



Maintenant faites executer ce programme. Vous allez apprendre 
bientot comment arreter l'execution. Pour le moment admirez la 
puissance de ce programme. Si vous avez tape RUN ainsi qu'on 
vous I'a indique plus haut, I'Apple He a deja execute l'instruction 
PRINT plusieurs centaines de fois. 



Pour arreter le programme, appuye z su r la touche \CW 
touche C en maintenant la touche I Ctrl I appuyee. 



puis sur la 



La commande [Ctrl I - C provoque I'arret de l'execution et vous 
indique ou l'execution a ete interrompue en affichant un numero de 
ligne, par exemple : 

BREAK IN 1 10 

Essayez. Vous pouvez remarquer qu'il s'agit d'une exception a la 
regie disant qu'il faut presser apres chaque instruction. II n'est 
pas en general nec essa ire d'appuyer sur , lorsqu'un programme 
est interrompu par | Ctrl I - C. 



5 

"5 



Utilisez [Ctrl I - C pour arreter l'execution du programme. 



Boucles : l'instruction GOTO 



La commande CONT permet de 
reprendre ou de continuer 
I'execution d'un p rogra mme 
interrompu par un [ Ctrl I - C, un STOP 
ou un END. 



Lorsque vous interrompez I'execution d'un programme par [CtrU - C, 
vous pouvez generalement reprendre son execution en tapant : 

CONT 

qui signifie "continue". Faites-le maintenant. 

En regardant I'ecran vous remarquerez que les nombres defilent 
puis disparaissent. Chaque nouveau nombre est affiche en bas de 
I'ecran et tous les autres sont deplaces d'une ligne vers le haut de 
I'ecran. Ce mecanisme s'appelle le scrolling (defilement). Vous avez 
pu I'observer depuis que vous travaillez sur votre Apple He rhais 
beaucoup plus lentement. 

Arretez a nouvea u le programme par | Ctrl I - C. Entramez vous a 
utiliser CONT et I Ctrl I - C, ils vous seront tres utiles. 

Si vous voulez redemarrer le programme depuis le debut, tapez 
RUN (a la place de CONT). Si vous etes prets pour un autre 
exemple d'utilisation de I'instruction GOTO, tapez : 

NEW 

100 PRINT "RAIN" 
110 PRINT "IS" 
120 PRINT "FALLING" 
130 PRINT "DOWN" 
140 PRINT "DOWN" 
1 50 PRINT "DOWN" 
1 60 GOTO 1 00 
RUN 

C permet d'interrompre I'execution du programme et CONT 



de la reprendre 

Precedemment, on vous a appris que la commande RUN lance 
I'execution du programme par I'instruction du plus petit numero de 
ligne. Mais si vous voulez commencer I'execution du programme 
par une autre ligne, par exemple la ligne 130, tapez : 

RUN 130 

et vous obtiendrez : 



DOWN 
DOWN 
DOWN 
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sur votre ecran avant que le programme ne revienne a la tigne 100 
et affiche le debut du texte. 

De meme vous pouvez preciser des numeros de ligne dans la 
commande LIST. Si vous tapez : 

LIST 130 

I'Apple He n'affichera que la ligne 130 (si elle existe). Si vous 
tapez : 

LIST 130, 150 
ou 

LIST 130-150 

I'ordinateur affichera toutes les lignes de programme entre 130 et 
1 50 comprises. Essayez. Par contre, vous ne pouvez pas indiquer 
une fourchette de lignes pour la commande RUN. 



L'Annexe A contient une breve description de chaque commande de 
I'Apple He. Lorsque vous avez besoin d'une information rapide (par 
exemple, si vous voulez savoir la difference entre les commandes RUN 
et LIST) cette annexe sera tres utile. 



Pause 



L'instruction INPUT permet a 
I'utilisateur de dialoguer avec le 
programme en cours d'execution. 



Dialogue avec votre programme : INPUT 

Les programmes que vous avez ecrits jusqu'ici peuvent deja 
impressionner vos amis les moins experimentes. Mais comment 
faire un programme qui pose des questions ? Pour cela vous 
pouvez utiliser l'instruction INPUT. 

Imaginons par exemple que vous vouliez ecrire un programme qui 
demande I'age d'une personne et utilise le nombre qu'elle a entre 
pour afficher un message. Vous connaissez deja l'instruction PRINT 
pour afficher un message. La premiere chose a faire est done 
d'inclure dans le programme le message que vous voulez utiliser. 
Vous savez egalement comment associer un nom de variable a une 
valeur. L'age est une variable : utilisez ce que vous avez appris. Ce 
que vous ne savez pas encore, e'est comment utiliser l'instruction 
INPUT. 



Dialogue avec votre programme : INPUT 




Tapez ce programme puis affichez-le pour verifier que vous n'avez 
pas fait de faute de frappe. Avant d'executer le programme, 
etudiez soigneusement Illustration 2-4. L'ordre et la syntaxe de 
chaque instruction sont tres importants. 




10 HOME 

20 INPUT "HOW MANY YEARS OLD ARE YOU ?" ; AGE 
30 PRINT "YOU ARE" ; AGE ; "YEARS OLD I" 



Faites executer ce programme. Lorsque vous voyez I'ecran vide et 
la question 



HOW MANY YEARS OLD ARE YOU ? 



tapez une reponse (votre age). Que se passe-t-il ? Essayez a 
nouveau en pretendant que vous avez un autre age. 

Illustration 2-4. Utilisation de 
I'instruction INPUT 



Efface le programme precedent 
Efface I'ecran- 



Le message ou la question posee 
est entre guillemets 

Un point-virgule separe le messagfe 
du nom de la variable 

Nom de la variable 



Affiche le message en incluant la 
valeur de la variable AGE 

Si vous ne tapez pas les espaces 
indiques, les deux mots seront 
accoles a la valeur affichee. 



-NEW 
■ 10 HOME 



30 PRINT "YOU ARE,"; AGE ; ".YEARS OLD ! " 




■A) INPUT'-HOW MANY YEA RS OLD ARE YOU?" ! AGE 

= I 



Lorsque vous utilisez I'instruction INPUT dans sa forme la plus simple, 
elle affiche un point d'interrogation et attend que vous tapiez quelque 
chose. Ce que vous tapez est conserve dans la variable. 

Lorsque vous utilisez I'instruction INPUT, vous devez definir : 

• quelle question ou quel message, vous voulez afficher pour 
I'utilisateur du programme. INPUT, comme PRINT, affiche 
exactement ce que vous ecrivez, il est done important de poser 
une question judicieuse. Le message doit etre entre guillemets et 
separe du nom de la variable par un point-virgule. 

• que voulez-vous que tape I'utilisateur ? S'il doit entrer un 
nombre, vous devez definir un nom de variable. 

L'utilisateur peut egalement taper un mot ou un groupe de caracteres. 
Un programme illustrera cela plus loin dans ce chapitre et vous en 
apprendrez plus sur I'instruction INPUT dans les Chapitres 4 et 5. 
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Voici maintenant un exemple de calcul que vous pouvez ajouter a 
votre programme INPUT. Ne modifiez pas les lignes 10 et 20 ; 
ajoutez la ligne : 

25 AGE = AGE * 365 

et modifiez comme suit la ligne 30 : 

30 PRINT "YOU ARE ABOUT"; AGE ; "DAYS OLD !" 

Utilisez la commande LIST pour verifier les nouvelles lignes puis 
executez le programme. Vous remarquerez que ce programme ne 
donne pas exactement I'age d'une personne en jours - sauf si 
c'est son anniversaire — il donne une estimation ; c'est pourquoi 
vous avez ajoute ABOUT dans la ligne 30. Chaque fois que vous 
voulez voir le resultat du programme, tapez RUN pour 
recommencer I'execution. 



Vous voulez conserver vos programmes 7 

Jusqu'a present vous avez utilise le mode programme en tapant 
des programmes avec des numeros de ligne, mais chaque fois vou 
tapiez NEW et votre programme precedent etait efface de la 
memoire de I'ordinateur. Cette section explique comment conserve 
vos programmes en utilisant le systeme d'exploitation disque de 
votre ordinateur. 



Preparation 

Pour sauvegarder un programme, vous avez besoin de deux 
choses : tout d'abord d'un programme a sauvegarder et ensuite 
d'un disque initialise ou d'une cassette magnetique sur laquellle 
ecrire le programme. Bien sur vous pouvez aussi conserver des 
programmes en les recopiant a la main sur du papier mais ce n'est 
pas aussi amusant que d'utiliser I'Apple He. 

• Vous devriez avoir initialise un disque avant de commencer c< 
manuel. Si vous I'avez fait, retrouvez-le et passez directemen 
a la section suivante "Sauvegarde". 

• Si vous n'etes pas sur qu'un disque est initialise verifiez-le er 
tapant : 



CATALOG 

et appuyez sur0. Votre ecran devrait afficher quelque chos< 
comme : 

DISK VOLUME 254 
A 002 HELLO 



l initialisation ou le formatage est 

un processus utilise pour preparer 
un disque pour recevoir des 
informations. Ce processus est 
decrit dans le Guide de I'Utilisateur 
Apple lie. 



CATALOG est une commande de 
DOS qui permet d'afficher la liste 
des fichiers contenue dans le disque 
place dans un iecteur donne. 



Vous voulez conserver vos programmes ? 
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Si ce message apparait sur I'ecran, le disque est initialise et 
vous pouvez passer directement a la section "Sauvegarde". 
Sinon referez vous au Guide de I'Utisateur Apple He qui 
explique comment initialiser un disque. 

Si vous avez deux lecteurs de disque connectes a votre 
Apple He vous devez savoir quel lecteur utiliser. Le DOS utilise 
automatiquement le disque 1 pour demarrer le systeme et 
continue a I'utiliser jusqu'a ce qu'on lui indique le contraire. 
Lorsque vous tapez, D2 dans une commande DOS — par 
exemple CATALOG, D2 - le DOS utilise le lecteur 2 (c'est ce 
que signifie D2) jusqu'a ce que vous lui demandiez le contraire 
en indiquant, D1 dans une autre commande DOS. 

Normalement avec deux lecteurs de disques, vous avez un 
disque systeme (par exemple DOS 3.3 SYSTEM MASTER) sur 
le lecteur 1 et un autre disque (comme le disque initialise que 
vous voulez utiliser) sur le lecteur 2. 

Pour plus d'information concernant I'utilisation d'un Apple lie 
avec deux lecteurs de disques, veuillez vous referer au Guide 
de I'Utilisateur Apple He. 

Si vous utilisez un magnetophone a cassettes a la place d'un 
lecteur de disque, consultez le Guide de I'Utilisateur Apple He 
pour savoir comment conserver des informations sur une 
cassette et au Manuel Applesoft de Reference pour ce qui est 
de I'utilisation des commandes de cassettes. 



Sauvegarde 

Si vous avez suivi le manuel, le programme de calcul de I'age est 
toujours en memoire. Pour creer une copie permanente de ce 

La commande SAVE suivie d'un programme sur le disque, tapez la commande SAVE suivie du nom 

nom de fichier est une commande que vous voulez donner au programme. Pour voir le deroulement de 

de DOS qui permet de copier sur le cec j ( assurez-vous que vous avez une disquette initialisee et tapez : 

disque le programme actuellement 

en memoire. La commande SAVE 

utilisee sans nom de fichier recopie 

le programme actuellement en SAVE AGE 

memoire sur cassette. 

Votre lecteur de disque va faire un bref bruit et vous verrez la 
lampe rouge s'allumer. Lorsque cette lampe s'eteint, tapez : 

CATALOG 

et vous obtiendrez la liste des programmes sur le disque ; il devrait 
y en avoir 2, ou davantage si d'autres programmes ont et§ d6ja 
sauvegardes. 
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Remarque : si vous avez eteint votre systeme, le programme de calcul 
de l'age n'est plus dans la memoire. Pour le sauvegarder sur le disque, 
retapez-le puis passez la commande SAVE AGE. 

Si vous utilisez un systeme avec deux lecteurs de disques et voulez 
sauvegarder votre programme sur le deuxieme lecteur tapez, D2 apres 
le nom du programme. 

Lorsque vous avez sauvegarde un programme sur un disque vous 
pouvez le recharger dans la memoire de I'ordinateur en tapant : 



La commande LOAD, utilisee avec 
un nom de programme, recherche 
ce programme sur le disque indique 
ou sur le disque utilise par defaut. 
Lorsque LOAD est utilisee sans nom 
de programme, le programme est lu 
sur le lecteur de cassette. 



LOAD AGE 

Lorsque vous tapez la commande LOAD, vous entendez le lecteur 
de disque rechercher le programme. Des que la lampe rouge 
s'eteint, affichez ou faites executer le programme que vous avez 
charge. 

Si rien ne se passe : retapez le programme et essayez de le 
sauvegarder a nouveau. Si, encore une fois, rien ne se passe, 
verifiez : 



que vous avez bien initialise le disque. 



• que le programme HELLO est bien affiche lorsque vous 
executez la commande CATALOG. 

• que vous n'etes pas en train d'essayer de sauvegarder le 
programme sur le disque maitre DOS 3.3 (ce disque est 
protege en ecriture, c'est-a-dire que vous ne pouvez pas y 
sauvegarder de programmes). 

• que si vous voulez utiliser le deuxieme lecteur de disque, vous 
n'avez pas oublie de taper, D2 dans votre commande. 

• Pause 



Les conditions : la recherche de la "verite" 

Beaucoup de choses sont conditionnelles dans la vie courante : un 
evenement doit arriver avant un autre. Par exemple, vous devez 
avoir un certain age avant de pouvoir voter ou avant de prendre 
votre retraite. Le gouvernement peut savoir si telle condition e"st 
remplie et prendre une decision si elle est remplie et une autre dans 
le cas contraire ; il en est de meme pour I'Applesoft. 



Les conditions : la recherche de la "verite" 
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Lorsque vous utilisez une instruction conditionnelle de I'Applesoft, 
il y a toujours deux reponses possibles : vrai ou faux. La condition 
faux est representee par (0) et la condition vrai par (1). Si, par 
exemple, vous tapez : 

PRINT 17 > = 18 

I'Apple He affichera sur la ligne suivante. 



PRIM 17 > 
f) 



= 18 



L'Applesoft a interprets I'instruction de la maniere suivante : 17 
est-il plus grand que 18, non ; done afficher pour indiquer que la 
condition est fausse. Si au contraire vous tapez : 

PRINT 75 > = 18 

I'ordinateur affichera 1 puisque 75 est bien superieur a 18. Essayez 
d'autres exemples de I'utilisation de la condition "superieur ou 
egal a" : 

PRINT 18 > = 18 
PRINT 3 > = 18 
PRINT 27 > = 18 

Les instructions conditionnelles, combinees avec les autres 
instructions presentees dans ce chapitre, permettent a I'Applesoft 
de faire des choix. Si une condition est verifiee, un certain 
ensemble destructions sera execute sinon un autre ensemble 
d'instructions le sera. 

La methode utilisee par I'Applesoft pour evaluer les conditions est 
basee sur le systeme binaire compose de et de 1 . Binaire est un 
mot tres utilise dans le vocabulaire informatique parce que les 
ordinateurs stockent et manipulent reformation sous forme 
binaire. Autrement dit, les informations que vous entrez dans un 
ordinateur sont traduites en suites de et de 1 ; on appelle encore 
cela le langage machine. 
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Symboles utilises dans les instructions 
conditionnelles 

L'Applesoft utilise six symboles pour definir les relations entre des 
valeurs. La Figure 2-5 donne la liste de ces symboles a'rnsi que 
quelques exemples d'utilisation. 



< Figure 2-5. Symboles utilises par 
I'Applesoft dans les instructions 
conditionnelles. 



I 



Symbole Signification 

Egal 

> Plus grand que ( 1 ) 

< Plus petit que (1 ) 

> = plus grand ou egal (11 

< = plus petit ou egal (1 ) 

< > different de 



Exemples 



Vraid) 

3 = 3 
78>55 
10<20 
4> = 4 
32< =33 
32<>33 



Faux(O) 

3 = 1 

78 > 124 
10<9 
4> =25 
32 < =30 
32<>32 



Remarquez que les symboles utilises pour "plus grand ou egal" et 
"plus petit ou egal" sont formes de < ou > suivis du signe =. Le 
symbole pour "different de" est forme de < suivi de > . 

Parmi les instructions suivantes, essayez de trouver celles qui sont 
vraies et celles qui sont fausses, puis essayez-les. (Souvenez-vous 
que vous pouvez remplacer PRINT par un point d'interrogation). 

PRINT 5<>5 

PRINT 8< =8 

PRINT -8 < -7 

PRINT -2> = -5 

PRINT 9<> -9 

^RINT (45*6)<>(-45 + 6) 



I 

i 



m 
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Regies d'utilisation des instructions conditionnelles 

• Les instructions conditionnelles peuvent contenir des variables 
(par exemple AGE), des nombres (comme 5) ou des 
expressions (comme 45*6). 

• Lorsque I'ordinateur evalue la yaleur d'une condition, le 
resultat est toujours soit soit 1 . 

• Dans les instructions conditionnelles, tous les nombres 
differents de sont consideres comme "vrais". 

• L'Applesoft evalue les conditions utilisees dans une instruction 
apres avoir evalue les expressions de cette instruction. 

L'Applesoft respecte un ordre precis pour revaluation d'une 
instruction contenant des operations arithmetiques et des 
conditions. 

• Premierement, les operations entre parentheses sont evaluees. 

• Deuxiemement, les signes moins utilises pour designer des 
valeurs negatives sont traites. 

• Troisiemement, les elevations a la puissance sont evaluees. 

• Quatriemement, les multiplications et les divisions sont 
calculees de gauche a droite dans une expression. 

• Cinquiemement, les additions et les soustractions sont 
calculees ; elles sont traitees de gauche a droite lorsqu'elles 
sont sur une meme ligne. 

• Sixiemement, les symboles utilises dans les conditions sont 
evalues ; les six symboles ont la meme priorite et sont evalues 
de gauche a droite. 



Pause 



Boucles conditionnelles : /'instruction IF. . THEN 

La premiere fois que vous avez essaye les boucles, en utilisant 
I'instruction GOTO, v ous a vez du interrompre I'execution de votre 
programme en tapant [CtrTI - C. Une autre facon de limiter 
I'execution d'un programme est d'utiliser I'instruction IF... THEN. 

Imaginons par exemple que vous vouliez compter jusqu'a 20 puis 
vous arreter. Vous avez besoin d'une instruction conditionnelle qui 
limitera la valeur de N a 20 au plus. Cela s'ecrit N< = 20. 
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Le programme doit compter tant que N est inferieur ou egal a 20 ei 
L'instruction IF... THEN permet de sinon s'arreter (c'est-a-dire si N >20). Voici le programme, il utilise 
creer des boucles conditionnelles. l'instruction IF... THEN. 

NEW 

200 N = 1 
210 PRINT N 
220 N = N + 1 

230 IF N< =20 THEN GOTO 210 

Tant que N sera inferieur ou egal a 20 le programme retournera a I; 
ligne 210. Lorsque cette condition ne sera plus remplie, le 
programme ne retournera pas en 210 et I'execution s'arretera. 

Les boucles, dans un programme d'ordinateur, ont un debut (ici la 
ligne 210) et une fin (ici la ligne 230) ; elles ont egalement une 
limite (ici 20). 

D'une maniere generale, l'instruction IF fonctionne de la maniere 
suivante : I'expression qui suit le mot IF est evaluee, si le resultat 
est (c'est-a-dire si la condition est fausse) le reste de la ligne de 
programme est ignore et I'ordinateur continue avec la ligne de 
programme suivante ; si le resultat de I'expression n'est pas nul 
(c'est-a-dire si I'expression est vraie), l'instruction suivant le mot 
THEN est executee. 

Pour rechercher le programme AGE dans la memoire, tapez : 
LOAD AGE 

puis tapez LIST. Vous devriez obtenir sur votre ecran : 




10 HOME 

20 INPUT "HOW MANY YEARS OLD ARE YOU ?"; AGE 
25 AGE = AGE * 365 

30 PRINT "YOU ARE ABOUT"; AGE ; "DAYS OLD I" 



Bouches conditionnelles : l'instruction IF . . . THEN 



Figure 2-6. Boucle conditionnelle. 



Pour experimenter un peu les instructions IF... THEN, modifiez les 
lignes 25 et 30 de la maniere suivante : 

25 IF AGE > 18 THEN GOTO 40 
30 PRINT "YOU WILL BE ABLE TO VOTE IN"; 
18 - AGE ; "YEARS." 

et ajoutez la ligne 40 : 

40 PRINT "YOU ARE ELIGIBLE TO VOTE. HAVE YOU REGISTERED ?" 

La Figure 2-6 montre les deux branches que peut prendre 
I'execution du programme. Apres avoir etudie ce schema, faites 
executer votre programme. 



1 HOME 

20 INPUT "HOW MANY YEARS OLD ARE YOU ?" , AGE 
1 25 IF AGE >1 8 THEN GOTO 40 



FAUX 

30 PRINT "YOU WILL BE. 
1 8-AGE : "YEARS" 
35 END 



VRAI 

40 PRINT "YOU ARE ELIGIBLE' 



Si vous ne voulez pas effacer votre ancien programme AGE, vous 
devez sauvegarder cette nouvelle version sous un nouveau nom. II est 
interessant de toujours utiliser des noms de programme significatifs : 
vous pouvez par exemple appeler ce nouveau programme VOTE-AGE. 



Utilisation du^Programme Applesoft COLORLOOP 

Le programme COLORLOOP est un programme de demonstration 
graphique qui utilise les boucles conditionnelles. II figure sur le 
disque APPLESOFT SAMPLER, vous n'aurez done pas a le retaper. 

Pour charger ce programme du disque dans la memoire de 
I'ordinateur, vous utiliserez les commandes que vous avez deja 
utilisees pour charger vos propres programmes. Verifiez simplement 
que vous avez bien le bon disque dans le lecteur. 
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Enlevez le disque que vous utilisiez pour sauvegarder vos 
programmes du lecteur et introduisez le disque marque APPLESOFT 
SAMPLER. Puis tapez : 

RUN COLORLOOP 

vous devez entendre le lecteur chercher le programme sur le 
disque. Quand le programme est charge dans la memoire, il 
demarre automatiquement. Si COLORLOOP ne demarre pas : 

• tapez CATALOG pour verifier que le disque APPLESOFT 
SAMPLER est dans le lecteur et que le programme 
COLORLOOP y figure. 

• tapez a nouveau la commande RUN en verifiant que vous ne 
faites pas de faute de frappe et que vous avez bien specifie le 
bon lecteur de disque (si le disque APPLESOFT SAMPLER est 
sur le lecteur 2 tapez, D2 apres le nom du programme). 

Lorsque I'execution est terminee, examinez le programme en 
tapant : TEXT, HOME puis LIST. Vous devriez voir ceci sur votre 
ecran. 

400 GR 

410 ROW= 1 

420 COLOR = ROW 

430 HLIN 0,39 AT ROW 

440 ROW = ROW +1 

450 IF ROW < 1 6 THEN GOTO 420 



Si vous n'avez pas de lecteur de disque, tous les programmes du 
disque APPLESOFT SAMPLER figurent dans ce manuel ; lorsqu'on vous 
demande de charger V'un de ces programmes a partir du disque 
trouvez-en le texte et tapez-le. 



Boucles conditionnelles : /'instruction IF... THEN 



Dans ce programme ROW est le nom d'une variable. L'instruction 
de la ligne 420 affecte la valeur de la variable ROW a COLOR. 
Chaque fois que la valeur de la variable ROW est modifiee, la valeur 
de COLOR est modifiee egalement. 

Observer I'execution du programme : il illustre par un graphique ce 
que vous avez utilise dans le programme AGE et dans le 
programme de comptage. Tant que la valeur de ROW est inferieure 
a 16, le programme retourne a la ligne 420 et execute une nouvelle 
fois la boucle d'instructions ; quand ROW depasse 16 le 
programme s'arrete. Vous commencez a comprendre comment I on 
peut combiner les instructions de I'APPLESOFT de maniere 
interessante. 



Complements sur l'instruction IF. THEN 

L'instruction IF est une instruction tres puissante, vous I'utiliserez 
dans la plupart des programmes que vous ecrirez. Le programme 
que nous allons etudier maintenant demontre ce que Ton peut faire 
en introduisant l'instruction IF dans un programme simple. Ce 
programme n'est pas sur le disque APPLESOFT SAMPLER car vous 
aurez a le modifier plusieurs fois. Les differentes modifications que 
vous ferez a ce programme vous montreront comment les diverses 
instructions que vous avez apprises peuvent etre combinees dans 
un programme. Souvenez-vous que vous devez taper : 

TEXT 

si vous voulez voir toutes les lignes du programme pendant que 
vous tapez. 

NEW 

200 GR 

210 COLOR = 9 

220 PLOT 0,0 

230 PLOT 0,39 

240 PLOT 39,39 

250 PLOT 39,0 

Affichez votre programme pour le verifier ; puis faites-le executer. 
Modifiez maintenant la ligne 210 pour changer la couleur affichee : 

210 COLOR = 15 
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Faites executer le programme encore une fois. Essayez d'afficher 
votre programme a nouveau : vous ne voyez que les lignes 240 et 
250. Le reste du programme a disparu de la petite fenetre de texte 
situee en bas de votre ecran. Ce fonctionnement durera tant que 
vous ne taperez pas : 

TEXT 

pour sortir du mode graphique, puis 

HOME 

pour effacer I'ecran avant de passer la commande LIST. 

Maintenant remplacez les lignes 220 a 250 avec les instructions 
suivantes et reaffichez votre programme (tant que vous etes 
toujours en mode texte). 



220 COLUMN =0 

230 VLIN 0,39 AT COLUMN 

240 COLUMN = COLUMN + 1 

250 IF COLUMN<40 THEN GOTO 230 



Ce programme remplit tout I'ecran avec la meme couleur. Faites-le 
executer. 



Puisque vous n'avez pas tape NEW, I'ancienne ligne 200 est toujours la 
et sera executee dans votre programme ; elle restera tant que vous ne 

Figure 2-7. Le programme VLIN- ta P erez P as NEW ' que vous ne 5™?™%%™ VOtr8 ordinateUr 0U qUe 

LOOP vous ne taperez pas une nouvelle ligne 200. 



Initialise le mode graphique. 200 GR 

Positionne la couleur. 210 COLOR=15 



Nomme la variable COLUMN car le 220 COLUMN = 

programme va travailler sur les 
colonnes du mode graphique basse 
resolution. Le programme 
commencera a la colonne 
(premiere colonne de I'ecran). 

Trace une ligne verticale dans la 230 VLIN 0,39 AT COLUMN - 

colonne 0. 



Ajoute 1 a la valeur de la variable 240 COLUMN = COLUMN + 1 

COLUMN. 



Si la valeur de COLUMN est 250 IF COLUMN < 40 THEN GOTO 230 

inferieure a 40 le programme 
retourne a la ligne 230 et trace une 
ligne dans la nouvelle colonne. 
Lorsque la valeur de COLUMN 
atteint 40 le programme s'arrete (en 
effet la derniere colonne de I'ecran 
est 39). 



Boucles conditionnelles : I'instruction IF THEN 



Pour eviter de taper RUN chaque fois que vous voulez colorier 
I'ecran, ajoutez la ligne 

260 GOTO 210 

Que se passe-t-il quand vous faites executer le programme ? 
Essayez de taper quelque chose... ce que vous tapez n'apparait pas 
parce que le programme s'execute en permanence : chaque fois 
qu'il arrive a ('instruction 260, il retourne en 210. Pour arreter ce 
programme, tapez I Ctrl I - C. Si vous voulez le relancer, tapez CONT. 

Arretez votre programme a nouveau avec I Ctrl I - C. Tapez TEXT, 
HOME et LIST. La ligne 260 cree une boucle infinie avec 
I'instruction GOTO car il n'y a rien dans le programme pour arreter 
cette boucle. Si vous voulez sauvegarder ce programme sans la 
boucle infinie, enlevez la ligne 260. 



Remarque sur les numeros de ligne : les numeros de ligne peuvent 
commencer par 10, 100, 1000 ou n'importe quel nombre, mais ce qui 
est important est de toujours laisser un intervalle entre deux numeros 
successifs afin de pouvoir ajouter facilement des instructions, si 
necessaire. Toutefois dans les exercices de ce manuel, gardez les 
numeros indiques sinon il vous sera difficile de suivre les differentes 
modifications du programme. 

Remarques 

Comme vous avez pu le voir dans I'exemple precedent, ce qui se 
passe dans une ligne donnee peut etre assez complique. 
L'Applesoft comporte une instruction prevue pour permettre de 
decrire ce qui va se passer : REM, qui est une abreviation de 
remarque. 



L'ordinateur ignore les instructions REM ; elles ne sont utilisees que 
par les humains. Par exemple, voyez comme il est facile de suivre 
le deroulement du programme VLIN LOOP lorsqu'il est 
abondamment commente comme dans la Figure 2-8. 
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Figure 2-8. Utilisation de 
I'instruction REM 



■ 



Programme commente 

195 REM SET GRAPHICS MODE 

200 GR 

205 REM SET COLOR 

210 COLOR=15 

215 REM START AT COLUMN 

220 COLUMN = 

225 REM DRAW VERTICAL LINE 
AT COLUMN 



235 REM PROCEED TO NEXT 
COLUMN BY ADDING 1 

240 COLUMN = COLUMN + 1 

245 REM LOOP MAKES IT 

EXECUTE OVER AND OVER 
UNTIL COLUMN 39 IS 
REACHED 

250 IF COLUMN<40 THEN GOTO 
230 



Programme non commente 



200 GR 



210 COLOR=15 



220 COLUMN = 



230 VLIN 0,39 AT COLUMN 



240 COLUMN = COLUMN + 1 



250 IF COLUMN<40 THEN 
GOTO 230 



Si vous regardez attentivement, vous pouvez verifier que le 
programme contient toujours les memes instructions ; les 
instructions -REM expliquent simplement ce que la ligne (ou les 
lignes) suivante va faire. 

Les instructions REM sont facultatives. L'Applesoft ne les execute pas, 
elles ne sont dans le programme qu'a titre a" information. Vous pouvez 
les utiliser comme vous I'entendez. Plus vos programmes seront longs, 
plus les instructions REM seront utiles. Elles aident a comprendre ce 
que fait le programme. 



Les instructions FOR/NEXT 
definissent Jjnefjoucle d'instructions 
qui seront ex6cutees un nombre de 
fois donne, specifie par le champ TO 
de I'instruction FOR. 



Les boucles FOR/NEXT 

Les instructions FOR/NEXT creent une boucle d'instructions qui 
seront executees un nombre de fois donne. Ce nombre est defini 
par une variable. Les instructions FOR/NEXT fournissent une 
methode plus efficace pour ecrire des boucles dans lesquelles vous 
utilisez une variable qui est regulierement augmentee. Tapez TEXT 
pour revenir en mode texte, puis HOME pour effacer I'ecran et 
enfin NEW pour effacer la memoire. Ensuite essayez ce 
programme : 



NEW 

100 

110 

120 

130 



FOR NUMBER = TO 1 2 
PRINT NUMBER 
NEXT NUMBER 

PRINT "PROGRAM IS FINISHED WHEN LAST NUMBER IN 
THE FOR STATEMENT IS DISPLAYED" 



Les boucles FOR/NEXT 
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Figure 2-9. Instruction FOR/NEXT. 
Une explication de chaque ligne 
pourrait etre introduite dans le 
programme en utilisant I'instruction 
REM. 



Faites executer ce programme. Vous pouvez voir que son resultat 
est le meme que celui du programme de comptage que vous aviez 
ecrit avec IF... THEN. La Figure 2-9 explique comment ce 
programme fonctionne. 



Definition de la plage de variation de 

la variable NUMBER : a 12. 100 FOR NUMBER = TO 12 

La valeur de NUMBER est affichee. 110 PRINT NUMBER 

Cette ligne definit la limite de la 120 NEXT NUMBER 

boucle. La variable est augmentee 
de 1 puis comparee a la limite 

specifiee dans la ligne 100 : 12. Si no phim "PROGRAM IS FINISHED WHEN LAST NUMBER IN THE FOR 

cette limite est depassee, le STATEMENT IS DISPLAYED" 

programme execute I'instruction 
1 30 et s'arrete. 



Dans une instruction FOR/NEXT, la variable est utilisee comme 
compteur : elle indique combien de fois la boucle va etre executee. 
Dans une boucle FOR/NEXT, si la variable n'a pas atteint sa limite 
superieure, I'execution continue par I'instruction suivant FOR/NEXT. 
Si la variable a atteint sa limite superieure, le programme sort de la 
boucle et execute I'instruction suivant le NEXT. Lors de I'execution 
du programme precedent le texte de la ligne 130 n'est affiche que 
lorsque la valeur de la variable excede 12. 

L'avantage le plus important des instructions FOR/NEXT est de 
vous eviter d'avoir a vous preoccuper du compteur lors de I'ecriture 
du programme. Si vous voulez tracer une serie de lignes 
horizontales sur I'ecran en utilisant les 16 couleurs, le programme 
suivant peut remplacer le programme COLORLOOP presente plus 
haut : 



GR 

REM SETS VARIABLE RANGE TO 0-15 
FOR ROW = TO 15 

REM MAKES VALUE OF COLOR THE SAME AS VALUE OF 
VARIABLE 
COLOR = ROW 

REM DRAWS HLIN AT EACH ROW WITHIN RANGE 
HLIN 0,39 AT ROW 

REM WHEN LIMIT OF RANGE IS REACHED PROGRAM ENDS 
NEXT ROW 

Pour sortir du mode graphique tapez TEXT et HOME pour effacer 
I'ecran. Regardez maintenant les deux programmes suivants, ils 
illustrent deux manieres d'afficher les nombres pairs entre et 12. 
Le premier utilise I'instruction IF... THEN. 



NEW 
3000 
3005 
3010 
3015 

3020 
3025 
3030 
3035 
3040 
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NEW 

100 X = 
110 PRINT X 
120 X = X + 2 

1 30 IF X < = 12 THEN GOTO 1 1 



A la ligne 120, la valeur de X est augmentee de deux. Dans cette 
boucle la valeur de X croft de 2 chaque fois. 

Le deuxieme exemple montre comment Ton peut faire en utilisant 
cette fois la commande STEP dans I'instruction FOR. 



STEP ne doit etre utilise que dans 210 FOR X = TO 1 2 STEP 2 
une instruction FOR/NEXT et est 210 PRINT X 

facultatif. 220 NEXT X 



Si vous executez votre programme, vous vous demandez peut-etre 
pourquoi vous voyez deux suites de nombres pairs sur I'ecran : 
tapez LIST et essayez de deviner pourquoi. 

Reponse : les deux suites de nombre sont apparues sur I'ecran parce 
que les lignes 100 a 130 ont ete executees en meme temps que les 
lignes 200 a 220 lorsque vous avez tape RUN. Si vous ne voulez voir 
que le resultat du deuxieme programme, tapez RUN 200. Pour 
supprimer un programme de la memoire, vous pouvez, soit supprimer 
chaque instruction une a une, soit taper NEW. 



La valeur precisee apres STEP peut etre un nombre quelconque 
traitable par I'Applesoft, c'est-a-dire entre -32768 et +32767. 
Un programme peut faire varier le compteur par pas de 5, 50 ou 
500. Un programme peut egalement diminuer le compteur : 

200 FOR X = 39 TO 15 STEP -3 

Entrez cette ligne et faites-la executer en tapant : 

RUN 200 

Notez que les lignes 210 et 220 ont egalement ete executees, car elles 
ont des numeros de ligne plus grands que celui indique dans 
I'instruction RUN. 

Vous pouvez maintenant essayer d'ecrire vos propres instructions 
FOR/NEXT. Plusieurs programmes utilises dans la suite de ce 
manuel utiliseront egalement I'instruction FOR/NEXT. 




Les boucles FOR/NEXT 
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Boucles embottees et enchevetrees 



Figure 2-10. Boucles emboTtees. Le 
programme HUE ^_ 



[.'instruction FOR/NEXT est tres pratique mais presente quelques 
limitations. Par exemple les boucles FOR/NEXT peuvent etre 
imbriquees, c'est-a-dire qu'une boucle peut etre comprise dans une 
autre, mais elles ne peuvent pas s'enchevetrer. Les figures 2-10 et 
2-1 1 donnent des exemples de boucles emboTtees et enchevetrees. 



NEW 
300 GR 

310 FOR HUE = 1 TO 15- 
320 COLOR = HUE 
330 FOR ROW = TO 39- 
340 HLIN 0,39 AT ROW 

350 NEXT ROW 

360 COLOR = HUE - 1 
370 FOR COLUMN = TO 39 
380 VLN 0,39 AT COLUMN 

390 NEXT COLUMN 

400 NEXT HUE 



1 



Le programme present dans la figure 2-10 est un exemple 
d'emboTtement a deux niveaux, il est sur le disque APPLE 
SAMPLER sous le nom HUE. Faites-le executer et essayez de 
comprendre son fonctionnement avant de continuer. 




Lorsque vous ecrivez un programme utilisant des instructions FOR, 
rappelez-vous qu'a chaque FOR doit etre associe un NEXT. 



Le programme de la Figure 2-1 1 illustre ce qu'on appelle des 
boucles enchevetrees. 

Figure 2-11. Boucles enchevetrees. 




NEW 

500 FOR N = 10 TO 20 1 

510 PRINT N 

520 FOR J = 30 TO 40 

530 PRINT J 

540 NEXT N 1 

550 NEXT J 



Ce programme ne fonctionne pas. Tapez TEXT, HOME puis RUN. 
C'est un exemple de ce qui se passe lorsque les boucles ne sont 
pas correctement emboTtees. Les boucles sont enchevetrees et les 
nombres affiches ne sont pas bons, finalement un message 
d'erreur est affiche. Essayez de corriger ce programme en 
decroisant les boucles. 
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Le programme de dessin de tissu ecossais presente dans la figure 
2-12 est un programme avec trois niveaux de boucles emboitees. 
Ce programme figure sur le disque APPLESOFT SAMPLER et 
s'appelle QUILT. Ce programme n'utilise pas le nom COLOR 
comme nom de variable parce que vous vous souvenez que COLOR 
est un mot reserve de I'Applesoft. 

Figure 2-12. EmboTtement a trois 
niveaux. Le programme QUILT, m 

NEW 

400 GR 

410 HUE ■ 

420 LOR COLUMN - TO 35 STEP 5 1 

430 FOR LINE 3 TO 30 STEP 10 . 

440 HUE = HUE + 1 

450 IF HUE > 15 THE\ HUE - 

460 COLOR - HUE 

470 FOR ROW LINE TO LINE + 9 1 

480 Hi ;N COLUMN, COI UMN - 4 AT ROW 

490 NEX! ROW 1 

500 NEXT LINE 1 

510 NEXT COLUMN — 1 



Tentons maintenant une petite experience. Tapez TEXT puis 
supprimez la ligne 400 en tapant 400 puis . Faites executer ce 
programme. 



Lorsque vous supprimez la ligne 400, le programme s'execute en mode 
texte ; si vous remettez la ligne 400, il s'execute a nouveau en mode 
graphique. Vous pouvez faire cela avec n'importe quel programme 
utilisant le graphique. 



Pause 



Boucles emboitees et enchevetrees 



Contrdle de la presentation des resultats 

La virgule et le point-virgule sont utilises par I'Applesoft pour 
produire differentes presentations des textes affiches par les 
programmes. II y a egalement trois instructions APPLESOFT pour 
controler cet affichage. Les exemples presentes dans cette section 
vous permettront de vous familiariser avec ces differentes 
possibilites. 

Tout d'abord entrez ce programme et regardez ce qu'il fait lorsque 
vous le faites executer : 

NEW 

100 PRINT "MELLOW" 
110 GOTO 100 

Arretez maintenant ce programme par I Ctrl I - C et ajoutez une 
virgule a la fin de la ligne 100 : 

100 PRINT "MELLOW", 

Faites executer ce programme a nouveau. Le programme affiche 
maintenant le mot en colonne. Utilisez encore l Ctrl J - C pour 
interrompre le programme et remplacez la virgule par un. point- 
virgule sur la ligne 100 : 

100 PRINT "MELLOW"; 

Si vous faites executer ce programme, vous verrez que cette fois 
les mots MELLOW sont tous accoles. Le programme affichera 
MELLOW, tant que vous n'arreterez pas par un [Ctrl| - C. 

L'utilisation du point-virgule produit des affichages sans espace entre 
les mots ou les chiffres et l'utilisation de la virgule permet de produire 
des resultats par colonnes. 

Modifiez votre programme en ajoutant I'instruction : 

90 V = 99 

et modifiez la ligne 100 de la maniere suivante : 

100 PRINT V 

Faites executer ce programme. Recommencez en ajoutant une 
virgule a la ligne 100 : 



100 PRINT V, 
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Puis remplacez la virgule par un point-virgule 

100 PRINT V ; 

Vous remarquez que la virgule et le point-virgule peuvent etre 
utilises egalement avec les nombres. La possibility d'afficher des 
valeurs numeriques non separees par des espaces peut parfois etre 
tres utile. 

Les virgules et les point-virgules peuvent etre utilises au milieu 
d'une instruction PRINT. Effacez votre precedent programme en 
tapant NEW puis entrez le programme : 

100 BALLS = 3 

110 STRIKES = 2 

120 PRINT BALLS, STRIKES 

RUN 

Votre ecran devrait afficher : 



3 2 



Vous pouvez rendre votre affichage plus clair en incluant un 
message dans ('instruction PRINT. Par exemple modifiez la ligne 
120 de la maniere suivante : 

120 PRINT "THE BALLS AND STRIKES ARE ";BALLS, STRIKES 
et le programme affichera : 

THE BALLS AND STRIKES ARE 3 2 



sauf si vous avez oublie I'espace apres ARE. Une autre presentation 
peut etre : 

120 PRINT "THE BALLS ARE ";BALLS;" AND THE STRIKES 
ARE ";STRIKES 

La facon elegante de presenter ce resultat est peut etre : 

120 PRINT "BALLS ";BALLS;" STRIKES ";STRIKES 



Contrdle de la presentation des resultats 
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qui produit un resultat analogue a un tableau d'affichage : 



BALLS 3 



STRIKES 2 



La fonction TAB doit etre utilisee 
avec I'instruction PRINT et permet 
de positionner le curseur a une 
colonne donnee sur I'ecran. 



Imaginons maintenant que vous vouliez afficher le mot HERE a 
partir de la dixieme colonne de I'ecran (I'ecran a 40 colonnes). 
Vous pouvez utiliser I'instruction : 



120 PRINT' 



HERE" 



en faisant tres attention a bien taper neuf espaces avant le mot 
HERE. Vous pouvez egalement utiliser la fonction TAB qui permet 
d'introduire dans votre programme des tabulations analogues aux 
tabulations d'une machine a ecrire. Essayez I'instruction : 

120 PRINT TABOO) ; "HERE" 

Pour voir TAB en action. 

TAB doit etre utilise dans I'instruction PRINT. Si vous essayez une 
instruction : 



VTAB deplace le curseur 



verticalement vers une ligne donnee 
de I'ecran (de 1 a 24). \ 



105 TAB (5) 

vous obtiendrez un message d'erreur. TAB doit etre suivi d'un 
parametre qui est un nombre ou une variable entre parentheses. 
Lorsque TAB est ainsi utilise avec une variable, il produit un nombre 
d'espaces egal a la valeur de cette variable. Par exemple : 

NEW 

200 FOR N = 1 TO 24 
210 PRINT TAB(N) ; "X" 
220 NEXT N 

II existe deux autres instructions qui permettent de positionner le 
curseur sur I'ecran. 

VTAB permet de deplacer le curseur verticalement et de le 
positionner sur I'une des 24 lignes de I'ecran. La ligne superieure 
est la ligne 1 et la ligne inferieure est la ligne 24. Contrairement a 
TAB, VTAB n'est pas utilise dans I'instruction PRINT. 
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HTAB deplace le curseur Vous pouvez egalement utiliser HTAB pour la tabulation horizontale. 

horizontalement vers une colonne 11 fonctionne comme TAB mais il permet de deplacer I'affichage 
donnee de I'ecran (de 1 a 40). aussi bien a gauche qu'a droite de la position d'affichage courante. 

HTAB ne doit pas etre utilise avec PRINT. Les colonnes de I'ecran 
sont numerotees de 1 a 40, 1 etant la colonne la plus a gauche de 
I'ecran. 

Voici un programme qui montre comment HTAB deplace le curseur 
sur I'ecran : 



10 PRINT "RUN" 

20 HTAB 5 

30 PRINT "FASTER," 

40 HTAB 34 

50 PRINT "FASTER," 

60 HTAB 81 

70 PRINT "OR ELSE !" 



Le programme SPACES du disque APPLESOFT SAMPLER illustre 
I' utilisation simultanee de HTAB et VTAB. Chargez-le dans la 
memoire ou entrez-le a votre clavier : 

NEW 

590 HOME 

600 FOR X = 1 TO 24 

610 FOR Y = 1 TO X 

620 HTAB X 

630 VTAB Y 

640 PRINT "APPLE" 

650 NEXT Y 

660 NEXT X 

670 GOTO 600 

Avant de demander I'execution de ce programme, essayez (et ce 
n'est pas facile !) de trouver ce qu'il fait. 

Bien que TAB, HTAB et VTAB fonctionnent a peu pres comme les 
coordonnees des instructions PLOT, elles presentent quelques 
differences. 

1 . Les 40 colonnes de I'ecran sont numerotees de 1 a 40 pour 
les instructions TAB, VTAB et HTAB comme sur une machine 
a ecrire alors que les coordonnees sont numerotees de a 
39 pour I'affichage graphique. 

2. Le parametre de VTAB peut varier de 1 a 24 seulement ; en 
effet, les caracteres sont plus gros que les points utilises 
dans le graphique a faible resolution et il n'y a done que 24 
lignes de texte. 



Contrdle de la presentation des resultats 
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La plus grande valeur qui peut etre utilisee avec HTAB et 
VTAB est 255. 



4. Si I'on utilise ou un nombre trop grand (ou trop petit) avec 
TAB, VTAB ou HTAB on obtient un message d'erreur : 

7ILLEGAL QUANTITY ERROR. 

5. Si I'on utilise une valeur plus grande de 40 avec TAB ou 
HTAB on revient au debut de la ligne suivante on appelle cela 
le bouclage. 

Pour voir ce fonctionnement tapez : 

NEW 

300 FOR K = 1 TO 255 
310 PRINT TAB(K) ; K 
320 NEXT K 

Normalement, on n'utilise pas TAB de cette maniere ; il serait plus 
normal d'ecrire cela en remplacant les lignes 310 et 320 par : 



310 
320 



HTAB K 
PRINT K 



et en ajoutant une ligne 330 : 

330 NEXT K 

Que se passe-t-il maintenant si vous remplacez HTAB par VTAB ? 
Comment pouvez-vous corriger ce programme pour respecter les 
limites de I'ecran ? 



Vous serez certainement de plus en plus a I'aise avec ce systeme. 
L'ecran est toujours divise en 24 lignes horizontales et 40 colonnes 
verticales. Les numeros de colonne varient suivant te mode de 1 a 40 
en mode texte et de a 39 en mode graphique. Les numeros de lignes 
changent parce qu'un caractere occupe plus de place que le point 
utilise en mode graphique. 

Voici un programme qui combine la plupart des instructions que vous 
avez utilisees dans ce Chapitre. Ce programme comporte quelques 
nouveautes pour vous : la variable N $ (vous en apprendrez plus sur ce 
type de variable dans le chapitre 5) et la ligne 70. 
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L'instruction END termine 
I'execution d'un programme et 
retourne le controle a I'utilisateur. 



NEW 

10 HOME 

20 INPUT "WHAT IS YOUR FIRST NAME?"; N$ 
30 PRINT 

40 FOR A = 1 TO 5 

50 PRINT TAB (A); "HI, "; N$; ", HOW ARE YOU ?" 
60 NEXT A 
70 END 

Affichez ce programme pour verifier votre frappe puis faites-le 
executer. S'il vous plait et que vous vouliez le conserver sur le 
disque, tapez : 

SAVE WELCOME 

puis CATALOG pour verifier que le programme est bien sur le 
disque. 
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Resume du chapitre 



Instructions 

NEW 
LIST 

GOTO 
CONT 
INPUT 
IF... THEN 
REM 

FOR/NEXT 

STEP 

PRINT 

TAB 

VTAB 

HTAB 

END 

Touches 

EtFD- C 



Commandes 
DOS 

RUN 

CATALOG 

SAVE 
LOAD 



Vocabulaire 

executer (execute) 

execution immediate (immediate 

execution) 

mode programme (deferred execution) 

numero de ligne (line number) 

programme (program) 

defilement (scroll) 

initialiser (initialize) 

par defaut (default) 

protege en ecriture (write protected) 

binaire (binary) 

langage machine (machine language) 
embofte (nested) 
parametre (argument) 
bouclage (wrap around) 

Message d'erreur 

BREAK IN 110 



b— 
fcr**™ 
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Modification de programmes 



73 Deplacement du curseur : mode escape 

73 Regies d'utilisation du mode escape 

74 Un exercice pratique 

76 D'autres commandes dans le mode escape 

76 Limites du mode escape 

77 Pour inserer du texte dans un ligne existante 

82 Pour se debarrasser des lignes d'un programme 

83 Pour mettre a jour des programmes volumineux 

84 Un peu d'histoire 

86 Resume des possibilites pour entrer du texte 
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Modification de programmes 



Jusqu'a present vous avez appris plusieurs methodes simples pour 
corriger les erreurs dans les programmes. Maintenant vous 
commencez a connaTtre la programmation et a ecrire des 
programmes plus longs. II est done temps de vous donner quelques 
outils supplementaires pour changer et editer votre travail. 

Simplement pour rafraTchir votre memoire : vous avez appris que si 
vous faftes une faute de frappe avant d'appuyer sur0, vous 
pouvez utiliser les touches et pour corriger I'erreur. vous 
permet de reculer le curseur jusqu'a I'erreur et 0de copier le reste 
de la ligne apres que vous ayez apporte la correction. 

Vous savez egalement que lorsque vous remarquez une erreur 
apres avoir appuye sur vous pouvez a nouveau retaper la ligne. 

Deplacement du curseur : mode Escape 

Une autre methode est d'utiliser la touche [Escl en combinaison 
avec les 4 touches de direction. Appelee mode escape, cette 
methode vous permet de deplacer le curseur sur I'ecran sans rien 
modifier a I'exception de la position du curseur. 



Regies d utilisation du mode Escape 

• Pour entrer dans le mode escape appuyez su r la tou che[EscJ. 

Pour quitter ce mode appuyez sur la touche lEspacel . Quand vous 
avez quitte le mod e escape pour y revenir il suffit d'appuyer 
sur la touche [Escl 



En utilisant le mode escape pour corriger ou modifier quelque 
chose, vous devez positionner le curseur sur le premier chiffre 
du numero de la ligne que vous desirez corriger. 

Ce mode vous permet de corriger seulement une ligne de 
programme a chaque fois. 



Modification de programmes 



Apres avoir modifie une partie de la ligne, il faut recopier le 
reste de la ligne en actionnant la touche H- 

Les touches et H n'ont pas le meme effet en mode escape 
et en mode normal. En mode escape, elles deplacent le 
curseur sans modifier les caracteres sur I'ecran. Les touches 
speciales de deplacement du curseur utilisees dans le mod e 
normal (done sans actionner prealablement la touche [Esc] 
effacentEl, et recopientQ, les caracteres qu'elles 
rencontrent. 



Un exercice pratique 

II y a plusieurs erreurs dans les lignes qui suivent. Si vous suivez 
les instructions pas a pas, vous aurez une idee de la facon dont 
fonctionne le mode escape. 



fcr 



Ce que vous faites... 



Ce qui se passe... 



Tapez exactement ce qui suit 



toutes les erreurs que vous 
tapez apparaissent sur I'ecran 



NEW 

10 PRUNT "THE MOCKINGBIRD' 
20 PRINT TAB (5) ; "SINGS" 
30 PRINT RAB (3) : "IN 
SPRING" 



Tapez LIST 10 


10 P RUN T"THE 
MOCKINGBIRD" 


Enfoncez une fois et relachez la 
touche | Esc | 


Cela vous place dans le mode 
"escape". 


Actionnez deux fois la touche \T\ 


Le curseur se deplace a la ligne 
10. 


□LIST 10 

18 P RUN T"THE MOCKINGBIRD" 


1 
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Actionnez une fois la touche El. 
Le curseur doit se placer sur le 
premier caractere. 



Remarquez le emplacement du 
curseur, et pourtant, rien n'est 
modifie sur I'ecran quand vous 
etes dans le mode escape. 
(Vous ne pouvez pas le voir, 
mais rien non plus n'est modifie 
dans la memoire de 
I'ordinateur). 



DLIST 16 

*@ P RUN T"THE MOCKINGBIRD" 



Actionnez la touche jEspacel 



Cela vous fait quitter le mode 
escape. 



Actionnez six fois la touche Q 



La touche recopie les 
caracteres si vous n'etes pas 
dans le mode escape (ainsi vous 
n'avez pas a les retaper). 



DLIST 19 

10 P RWN T"THE MOCKINGBIRD" 



Remplacez le U par un I. 



3LIST 10 



10 P RIM T"THE MOCKINGBIRD' 



Copiez les caracteres restant de la ligne en utilisant la toucheQ ■ 
Lorsque vous aurez atteint la fin de la ligne, actionnez la touche 0. 



Deplacement du curseur : mode escape 



Tapez LIST 1 pour faire 
apparaitre la ligne corrigee. 



3LIST 16 

10 PRINT "THE MOCKINGBIRD" 
3* 



Si maintenant vous lanciez I'execution du programme, 
le message PSYNTAX ERROR IN 30 apparaTtra sur I'ecran car il y a 
deux erreurs dans la ligne 30 que vous n'avez pas encore corrigees. 
RAB devrait etre TAB, et les deux points devraient etre un point 
virgule. Pour corriger la ligne 30, tapez d'abor d LIS T, puis placez-vous 
dans le mode escape en actionnant la touche I Esc I et utilisez les 
touches speciales de deplacement du curseur pour positionner le 
curseur au debut de la ligne 30. 

Suivez I'enchaTnement des operations que vous avez utilise pour 
la ligne 10 : quittez le mode escape, utilisez la touche pour 
placer le curseur sur les caracteres errones, corrigez-les et 
recopiez le reste de la ligne. Listez a nouveau pour vous assurez 
que toutes les erreurs ont bien ete corrigees, puis lancez 
I'execution du programme. 

II peut vous paraitre un peu complique, tout au moins dans un 
premier temps, de vous servir du mode escape, mais avec un 
peu de maTtrise, cela deviendra beaucoup plus facile. C'est sur ! 



D'autres commandes dans le mode Escape 

Trois autres commandes sont utiles si vous devez introduire 
beaucoup de texte. Elles sont toutes actives dans le mode 
escape. 

• I Esc I @ (enfoncez la touche I Esc I , laissez-la revenir puis 
servez-vous de la touche @ pour produire le caractere @ efface 
entierement I'ecran comme le fait I'instruction HOME. 

• I Esc I F efface toute la partie de I'ecran comprise entre le curseur et 
le bas de I'ecran. 

• I Esc I E efface la ligne a partir de la position du curseur. 



Limites du mode Escape 

Maintenant que vous avez utilise avec succes le mode escape 
pour corriger quelques lignes d'un programme, vous pouvez 
prendre un peu de repos. Placez vous dans le mode escape et 
jouez avec les quatre touches speciales de deplacement du 
curseur : deplacez le curseur vers le haut de I'ecran, vers le bas, 
remontez au milieu, vers le cote droit et tout autour. 



Modification de programmes 



Que se passe-t-il lorsque le curseur atteint le cote droit de I'ecran ? 
(Reponse : il vient sur le cote gauche. Vous avez deja vu cela 
quand vous avez utilise TAB et HTAB). Que se passe-t-il si vous 
actionnez accidentellement d'autres touches alors que vous etes 
dans le mode escape ? Essayez done. Decouvrir des maintenant ce 
qui se passe vous evitera plus tard quelques tracas. Lorsque vous 
en aurez assez de dep lacer le curseur tout autour de I'ecran, 
actionnez la touche lEspacel pour quitter le mode escape. 



Conseil utile : Si vous ne placez pas le curseur sur le premier caractere 
du numero de la ligne que vous voulez corriger, vous perdrez quelques 
caracteres de la ligne. Si vous ne le croyez pas, essayez-le done ! 

Si vous avez d'abord corrige la ligne 10, puis liste et corrige la ligne 30, 
e'est qu'il est difficile de corriger plus d'une ligne a la fois en mode 
escape. 



Pour inserer du texte dans une ligne existante 

Vous remarquerez, parfois, qu'ajouter quelque chose a une ligne 
d'un programme ameliore un peu ce dernier. Supposons, par 
exemple, que vous vouliez inserer I'instruction TAB ( 10 ) apres 
PRINT dans la ligne 

90 PRINT "THIS IS A SHORT PROGRAM" 

Suivez pas a pas les instructions qui suivent pour comprendre 
comment utiliser I'insertion de texte 



Ce que vous faites... Ce qui se passe... 


Tapez 




NEW 

90 PRINT "THIS IS A SHORT PROGRAM" 




Utilisez RUN pour visualiser 
I'aspect de la ligne 




3RUN* 

THIS IS A SHORT PROGRAM 


Pour inserer du texte dans une ligne existante 





Tapez LIST 90 



DLIST 99 




90 PRINT "THIS IS 
M " 


h SHORT PROGRA 


] 




Actionnez la touche|Esc| 


Cela vous place dans le mode 
escape. 



Actionnez la touche LH trois fois Cela positionne le curseur sur le 
et une fois la touche B premier caractere du numero de 

la ligne. Le curseur doit etre sur 
le premier caractere pour que 
les corrections ou les insertions 
se passent normalement. 



Actionnez la touche [Espacel Cela fait quitter le mode escape. 



Actionnez la touche dix fois. Cela positionne le curseur a 

I'endroit de la ligne ou vous 
voulez inserer quelque chose. 



□LIST 90 




90 PRINT «THIS IS A 

M" 


SHORT PROGRA 


1 




Actionnez | Esc I . 


Cela vous ramene dans le mode 
escape. 


Actionnez une fois la touche [T] 


Cela positionne le curseur juste 
au-dessus de la ligne, ce qui 
vous permet d'ajouter du texte 
a la ligne. 


DLIST 90 




m PRINT "THIS IS A 

M" 


SHORT PROGRA 






Actionnez une fois la touche 

lEspacel 


Cela vous fait quitter le mode 
escape. 
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Tapez TAB ( 10 ); 



C'est le texte que vous ajoutez 
a la ligne. 



ULIST yy . 

tab < l 

90 PRINT "THIS IS A 
M" 


SHORT PROGRA 


3 




Actionnez lEscI 


Cela vous ramene dans le mode 
escape. 


Actionnez une fois la touche [T|. 


3LIST 90 

TAB < 10 >; 
90 PRINT "THIS IS & 
M" 


SHORT PROGRA 


1 




Actionnez huit fois la touche 


Cela ramene le curseur au point 
ou vous avez commence 
I'insertion. Cela vous permet, 
apres avoir quitte le mode 
escape, de recopier le reste de 
la ligne avec la touche 0- 


]LIST 90 TAB <ie>i 

90 PRINT *THIS IS A 
M" 


SHORT PROGRA 


3 




Actionnez la touche lEspacel 


Cela vous ramene dans le mode 
escape. 


Actionnez 23 fois la touche □ 
jusqu'a ce que le curseur soit 
sur I'espace suivant la lettre A 

de PROGRAM. 


□LIST 90 

TAB <10>; 
90 PRINT "THIS IS A 
M" 


SHORT PROGRA 


] 





Pour inserer du texte dans une ligne existante 
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Actionnez la touche [Esc I 



Cette action, comme les deux 
qui suivent, permet de deplacer 
le curseur vers la droite sans 
recopier les espaces entre 
PROGRA et M. Reportez-vous a 
conseil utile (qui suit) pour plus 
de details. 



Actionnez la touche jusqu'a 
ce que le curseur soit sur le M. 





□LIST 99 






TAB ■:. 10 




■ 


90 PRINT "THIS IS (■ 


i SHORT PROGRA 


I 


] 


- 



Actionnez la touche lEspacel 



Cela vous fait quitter le mode 
escape. 



Recopiez le reste de I'instruction 
grace a la touche et 
actionnez 0. Listez (par LIST) la 
ligne. 



DLIST -98 


TAB < 10 ); 






. 99 PRINT 


"THIS IS f 


SHORT PROGRA 


M" 






3LIST 96 






90 PRINT 


TAE< 10). 


"THIS IS A SH 


ORT ? 


PROGRAM" 




3* 







Executez le programme (par 
RUN) pour apprecier la 
difference avec I'ajout de 

TAB ( 10). 



THIS IS A SHORT PROGRAM 
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Maintenant essayez d'ajouter VERY devant SHORT dans la meme 
ligne. Lorsque vous aurez termine, I'instruction devra etre 
semblable a la liste suivante 




Conseil utile : Applesoft utilise une grille de 40 colonnes de large. C'est 
a dire qu'une ligne de 40 caracteres peut etre affichee sur une seule 
ligne. Toute ligne comportant plus de 40 caracteres est 
automatiquement coupee et terminee sur la ligne suivante. Lorsque 
vous modifiez une telle ligne, vous devez utiliser le mode escape pour 
que la ligne corrigee ne comporte pas les espaces a droite de la ligne 
automatiquement scindee. C'est ce que vous avez fait lorsque vous 
etes revenu au mode escape entre le A et le M de PROGRAM. Lorsque 
le curseur est place sur le premier caractere de la deuxieme ligne, le 
mode escape abandonne, utilisez la toucheQ pour achever la recopie. 

Une autre instruction permet aussi de diminuer la largeur de I'ecran et 
de supprimer I'ajout de ces espaces ; c'est POKE 33,33. Vous n'avez 
pas besoin de la connaltre pour I'instant, mais vous pourrez I'etudier 
plus tard et dans le detail dans le Manuel de reference d 'Applesoft 
(Applesoft Reference Manual). 



Pour inserer du texte dans une ligne existante 



Pour se debarrasser des lignes d'un programme 

Naturellement, il peut arriver que vous decidiez qu'une ligne d'un 
programme ne vous convienne pas et que vous vouliez vous en 
debarrasser. II y a plusieurs facons de supprimer des lignes d'un 
programme. 

Si vous avez juste termine de frapper la ligne et decide qu'elle ne 
vous convenait plus avan t d'a voir actionne0, vous pouvez utiliser 
le caractere de controle : I Ctrl 1 - X. Essayez-l e en tapant la ligne plus 
bas. Avant de taper 0, enfoncez la touche lCtrfl tout en tapant sur 
la touche marquee X. Si vous ne faites pas attention et que vous 
tapez avant d'avoir utilise I Ctrl I - X, vous n'aurez qu'a taper NEW 
et a recommencer. 



10 PHIN I "WHY AiV I DOING THIS ?"\ 



Comme vous pouvez le voir dans I'illustration et comme cela 
apparaTt sur I'ecran (vous etes bien en train de faire les exercices, 
n'est-ce pas ?), un s lash (\) apparaTt a la fin de la ligne au moment 
oil vous utilisez [CtfTl - X. Si vous essayez de lister la ligne, rien 
n'apparaTt. Vous avez surement supprime cette ligne ! 

Maintenant tapez 

20 PRINT "AN ELEPHANT JUST WALKED IN" 

et actionnez0. Si vous decidez de modifier ou de supprimer cette 
ligne maintenant, vous avez le choix entre plusieurs possibilites. La 
premiere est de remplacer la ligne en retapant sur celle-ci une autre 
instruction, comme par exemple 

20 PRINT "THIS IS VERY SILLY" 

Cependant si vous voulez eliminer completement la ligne, vous 
pouvez taper 

20 

et elle disparaitra. Si vous en doutez, tapez LIST 20. 
La deuxieme facon de proceder est de taper I'instruction 




L'instruction DEL retire ou supprime, 
de vos programmes, les lignes 
specifiees. 



DEL 20,20 
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DELETE est une commande DOS qui 
retire du disque le programme dont 
le nom a ete specif ie. 



qui demande a I'ordinateur de detruire une ou plusieurs lignes. 
Comme il est, bien evidemment, plus simple de taper 20 que de 
taper DEL 20,20, vous devez sans doute vous demander pourquoi 
I'instruction DEL est si remarquable. Cela ne vous sera pas evident 
tant que vous ne voudrez pas supprimer plusieurs lignes de votre 
programme. Au lieu de taper separement chaque numero de ligne, 
vous pouvez taper 

DEL 10,90 

Ce qui supprimera toutes les instruction comportant un numero de 
ligne entre 10 et 90, bornes incluses. 



La commande DEL d'Applesoft ressemble a la commande DELETE 
utilisee par le "gestionnaire du disque" (Disk Operating System DOS) 
mais ce n'est pas la meme chose. 

DELETE est toujours employee pour effacer du disque des programmes 
complets et est toujours suivie par le nom du programme que vous 
voulez retirer du disque. 

DEL, comme vous venez de I'apprendre, est suivie de deux numeros de 
lignes separes par une virgule. Si vous confondez les deux commandes 
et utilisez la mauvaise, ne vous inquietez pas. Apple He vous le 
rappellera par un message d'erreur. 

La touche rDeTl du clavier d'Apple lie est differente des commandes DEL 
ou DELETE. Reportez-vous au Guide de I'Utilisateur Apple ll e et au 
Manuel de Reference d'Apple lie pour plus de details. 



I Ctrl I- S arrete et relance la liste du 



Pour mettre a jour des programmes volumineux 

Tout I'interet d'utiliser le mode escape pour faire des modifications 
vous deviendra evident quand vous travaillerez sur des lignes tres 
longues ou des programmes tres longs. Plus vous ecrirez vos 
programmes et plus vous utiliserez le mode escape. 

Le mode escape presente plusieurs avantages : 

• II est plus rapide de I'utiliser pour mettre a jour une ligne 
particulierement longue d'un programme (par exemple, 
230 caracteres). 

• II est plus facile de fusionner deux programmes qui ont un 
grand nombre de lignes identiques. 

• Vous pouvez lister une ligne qui apparaTt plus d'une fois sous 
la meme forme, en faisant les changements necessaires, et en 
la recopiant pour une reproduction plus simple. 

Cependant, ces utilisations du mode escape sont un peu 
prematurees. Un sujet plus simple pour le moment est I'utilisation 
de rUtrfl- S. 



programme. 



Pour mettre a jour des programmes volumineux 
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Quand un programme comportant beaucoup de lignes est liste, les 
lignes defilent trop vite pour la plupart d'entre nous, ce qui nous 
empeche de les lire. Une facon de resoudre cette difficulte est de 
lister le programme par morceaux, en tapant, par exemple 

LIST 10,100 

et puis 

LIST 110,200 

et puis 

LIST 210,300 

et ainsi de suite jusqu'a ce que vous ayez examine toutes les lignes 
du programme. 

Une autre method e, pl us simple, est de maTtriser le defilement des 
lignes en utilisant I Ctrl I - S pour arreter le defilement et le relancer 
lorsque vous avez examine les lignes sur I'ecr an. C ela prend un 
moment avant d'arriver a actionner assez vite I Ctrl l et S, mais cela 
en vaut la peine. 

Un peu d'histoire 

Huit autres touches, a cote des quatre touches de deplacement du 
curseur, peuvent servir pour entrer du texte. Si vous connaissez 
bien les modeles plus anciens d'Apple, vous devez savoir a quoi 
servent ces touches. De toute facon, un peu d'histoire est utile. 

Dans la premiere version d'Apple II, il n'y avait, sur le clavier, ni les 
touches [Q ni GQ et le mode escape n'exist ait p as. L'entree du texte 
se faisait en alternant I'usage de la touche [Esc1 avec les touches A, 
B, C, et D : A deplacait le curseur vers la droite, B le deplacait vers 
la gauche, C le deplacait vers le bas et D le deplacait vers le haut. 
Si, par exemple, vous vouliez deplacer cinq fois le curseur vers le 
haut et placer quatre espaces a sa gauche, vous deviez taper, dans 
I'ordre 



[Esc] D Esc]D EsS D [Esc] D Esc] D 



[Esc] BEIclBrEsclBEsclB 

Pas simple I Vous imaginez qu'il etait facile de se tromper. 
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tea 



Figure 3-1. Touches de direction. 

m 

HQ] EE 





La faconde faire fut changee par la suite : une seule frappe sur la 
touche FEscI devint suffisante pour se placer dans le mode escape. 
Cependant, le clavier n'avait pas encore de touche de deplacement 
du curseur. Les quatre touches I, J, K et M furent utilisees pour 
deplacer le curseur. En regardant le clavier, vous vous apercevrez 
que ces touches sont disposees en forme de croix. Leur action est 
en rapport avec leur position : I deplace le curseur vers le haut, J le 
deplace vers la gauche, M le deplace vers le bas et K le deplace 
vers la droite. 

Bien qu'il fut ajoute des touches de deplacement du curseur, I, J, K 
et M fonctionnent toujours dans le mode escape. Vous pouvez 
toujours vous servir des touches A, B, C, et D, si vous faites 
preceder chaque frappe d'une frappe sur la touche [Eicl . Si vous 
avez appris I'une des anciennes methodes, vous pouvez toujours 
pratiquer de la meme facon et alors ne vous forcez pas a utiliser les 
touches speciales de deplacement du curseur. II se peut egalement 
qu'une des anciennes methodes vous convienne mieux. Apple He a 
ete concu de telle sorte que les trois touches deplacent le curseur 
dans la meme direction. Figure 3-1 visualise ces directions. 



I 



Un peu d'histoire 



Resume des possibilites pour entrer du texte 



En mode escape 

Pour se placer dans le mode 
escape : 

Pour quitter le mode escape : 
Pour deplacer le curseur vers le 
haut : 

Pour deplacer le curseur vers le 
bas : 

Pour deplacer le curseur vers la 
gauche : 

Pour deplacer le curseur vers la 
droite : 

Pour effacer la ligne a partir de 

la position du curseur : 

Pour effacer I'ecran a partir de la 

position du curseur : 

Pour effacer tout I'ecran : 

Hors du mode escape 

Pour annuler un caractere : 
Pour recopier ou retaper un 
caractere : 

Pour annuler une ligne avec 
d'avoir actionne 
Pour arreter la liste d'un 
programme : 

Pour relancer la liste d'un 
programme : 

Pour supprimer une ou plusieurs 
lignes : 

Pour supprimer du disque tout 
un programme : 



Actionnez la touche I Escl 
Actionnez la touche lEspacel 

Utilisez [D, I, i, D ou d 

Utilisez CD, M, m, C ou c 

Utilisez 0, J, j, B ou b 

Utilisez EL K, k, A ou a 



Actionnez I Esc I - E 

Actionnez [Escl - F 
Actionnez I Escl - @ 



Actionnez la toucheQ 
Actionnez la toucheQ 



Actionnez I Ctrl I - X 



Actionnez LCtrJJ - S 
Actionnez lCtrll - S 
Utilisez I'instruction DEL 
Utilisez la commande DELETE 
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Du graphique 



89 Construction d'un jeu simple 

90 Instructions multiples dans une ligne 

91 Creation du mouvement 

92 Limite de I'ecran 

93 Creation d'impressions visuelles 

93 L'article entier 

94 Programme avec intervention des utilisateurs 
97 Production de bruits 

100 Bruit de la balle au rebond 

100 Nombres aleatoires 

103 Simulation d'une paire de des 

103 Graphiques aleatoires 

104 Les sous-programmes : assemblage des elements 

108 Trace 

109 Un meilleur programme de trace de chevaux 

110 Les erreurs 

110 Les variables 

111 Sous-programmes complementaires 

112 Un programme bien structure 

113 Graphique haute resolution 
120 Resume du chapitre 



Du graphique 



Chapitre 4 



Du Graphique 




Maintenant que vous disposez de quelques outils supplementaires 
de mise a jour, vous etes probablement presse de vous attaquer de 
plus pres a la programmation. Ce chapitre vous fera faire un grand 
bond en avant en vous guidant dans la construction et les 
modifications de programmes plus longs et plus compliques. Vous 
verrez comment des programmes sont construits morceau par 
morceau et comment les instructions travaillent en tant 
qu'elements de la construction. 

Ne croyez pas etre capable de faire tout ceci par vous-meme 
correctement ! Apprendre a programmer ne va pas de soi ; plus 
vous travaillerez les programmes de ce manuel, mieux vous saure: 
vous y prendre pour votre propre compte. 



Voir Chapitre 2, « Utilisation de 
I'APPLESOFT SAMPLER 
COLORLOOP » pour plus 
d'information. 



Construction d'un jeu simple 

Ce paragraphe presente un certain nombre d'elements ou parties de 
programme utilises de facon typique dans les jeux video. II montre 
une methode pour utiliser la couleur afin de creer des impressions 
visuelles sur I'ecran. 

Avant d'aller plus loin, chargez le programme COLORBOUNCE 
d'APPLESOFT SAMPLER en tapant 

LOAD COLORBOUNCE 

Puis, pour travailler COLORBOUNCE, executez le en tapant RUN. 

Si vous n'utilisez pas d'unite de disque, voyez « I'article entier » de ce 
chapitre. Tapez le programme, testez-le et executez-le. 



Pour arreter le programme, appuyez sur I Ctrl i - C. Maintenant lisez 
les quelques paragraphes suivants pour decouvrir le 
fonctionnement de ce programme. Chaque paragraphe presente un 
element different du programme. 



Du graphique 
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Instructions Multiples dans une Ligne 

li.Qnn'a maintenant la plupart des lignes de programmes sur 
fesqueMe^^s aveVuavanie ne renfermaient qu'une instruction par 

fane Avec cette methode vous pouvez commencer un programme 
par (souvenez-vous qu'il vous suffit de lire ce paragraphe sans 
utiliser votre Appel He). 

400 REM MODE GRAPHIQUE 
420 GR 

Cependant, ('utilisation du deux points <:) entre des instructions 
vous permet d'associer plusieurs instructions sur un seul numero 
de ligne dans un programme. Ainsi : 

400 GR : REM MODE GRAPHIQUE . 

Cela rend parfois les lignes de programmes plus faciles a 
comprendre si les commentaires sent sur la igne concernee 
comme dans la ligne 400. D'auitres fois ^ est me ^ ^ a 
remarque soit sur une ligne differente. COLORBOUNCE utilise les 
deux methodes. 

Le deux points peut etre utilise pour deux instructions quelconques. 
Voici d'autres exemples : 

390 HOME : PRINT "THAT WASN'T BETWEEN 1 AND 15 !": 
PRINT 

720 COLOR = : PLOT X, Y 
760 X = NX : Y = NY 

I a licne 390 associe trois instructions dont la signification est la 
suivante : HOME vide I'ecran, le premier PRINT affiche un message 
dou Tutilisateur, et le second PRINT saute une ligne apres le 
message A la ligne 720, la couleur noire est retenue chaque fo.s 
que X et Y sont represents ; le paragraphe « Creation 
3 impression visueHes » donne dayantage d'exp hcat.ons sur ce 

de ligne. 
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La balle bondissante, qui en realite et un pave visualise se 
deplacant sur la grille, est creee au moyen de six variables dans 
COLORBOUNCE : 

X represente le point de depart du mouvement lateral 
Y represente le point de depart du mouvement vertical 
XV represente la vitesse de X 
YV represente la vitesse de Y 

NX represente la position courante de X (NX = X + XV) 
NY represente la position courante de Y (NY = Y + YV) 

Les lignes de programme qui introduisent ces variables dans 
COLORBOUNCE s'identifient presque aux descriptions que vous 
venez de lire. L'utilisation des instructions REM en clair est d'une 
aide certaine. 

440 X = : REM SET STARTING POSITION OF BACK-AND- 

FORTH VARIABLE 
460 Y = 5 : REM SET STARTING POSITION OF UP-AND-DOWN 

VARIABLE 
480 XV = 2 : REM SET X VELOCITY 
500 YV = 1 : REM SET Y VELOCITY 
520 REM CALCULATE NEW POSITION 
540 NX = X + XV : NY = Y + YV 



Conseil utile : Si vous trouvez que plusieurs instructions par ligne de 
programme sont une source de confusion, il est parfaitement autorise 
de developper. Dans cette partie de programme, vous aurez par 
exemple 1 1 lignes au lieu de 6. 

Une des raisons principales de I'association des instructions est 
I'economie de place pour les longs programmes : plus il y a de 
lignes dans un programme, plus il y a besoin de memoire. Une 
autre raison est que I'execution d'un programme est plus rapide s'il 
y a plusieurs instructions par ligne. Une troisieme raison est que 
certa'rnes instructions, comme IF... THEN contrdlent toutes les 
instructions de la meme ligne ; ainsi le programme travaille en 
fonction de la position des instructions. Quand vous commencerez 
a ecrire pour vous des programmes plus longs, vous trouverez des 
« recettes » utiles pour economiser place et temps dans le Manuel 
de Reference Applesoft. 



Construction d'un jeu simple 
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Limites de I'ecran 



Pour commencer a representer des points sur la grille graphique 
vous devez connaTtre deux elements essentiels d'information : la 
grille comporte 40 points horizontaux et 40 points verticaux ; le 
systeme de numerotage de la grille va de a 39 dans les deux 
directions. Pour conserver une balle bondissante a I'interieur de ces 
limites, vous avez deux choses a faire : 

1 . Initialiser ces limites dans le programme pour que la balle ne 
semble pas sortir de I'ecran. 

2. Changer la direction de la balle quand elle atteint le bord de 
I'ecran. 

Les lignes suivantes de COLORBOUNCE font ces deux choses. 
Examinez-les attentivement de facon a comprendre la methode de 
travail. 

560 REM IF BALL EXCEEDS SCREEN EDGE, THEN BOUNCE 
580 IF NX > 39 THEN NX = 39 : XV = -XV 
600 IF NX < THEN NX = : XV = -XV 
620 IF NY > 39 THEN NY = 39 : YV = -YV 
640 IF NY < THEN NY = : YV = -YV 

II n'est pas facile de representer ceci. Une chose a se rappeler est 
le fait que les variables ne sont pas statiques : si sur une ligne on a 
XV = - XV, le contenu de la variable prend reellement une valeur 
negative. 

En d'autres termes, quand la table atteint la limite de I'ecran, en 
39, la ligne 580 change XV en la valeur negative de XV. Puis, 
quand la ligne 540 est atteinte dans la boucle suivante, NX passe a 
38. Dans la boucle suivante, NX passe a 37 et ainsi de suite, 
jusqu'a ce que la balle atteigne I'autre bord de I'ecran ; a partir de 
ce point 1 est ajoute a la valeur de NX a chaque boucle. Voila 
comment on change de direction dans le deplacement lateral. 
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Creation d'impressions visuelles 

En alternant entre le noir et une couleur pour la balle a chaque fois 
qu'une nouvelle position est representee en X et Y, vous pouvez 
effectuer un effacement apparent, donnant I'impression visuelle 
d'un mouvement de la balle. Ceci est realise dans les lignes 
suivantes de COLORBOUNCE : 

660 REM PLOT NEW POSITION 
680 COLOR = 7 : PLOT NX, NY 
700 REM ERASE OLD POSITION 
720 COLOR = : PLOT X, Y 
740 REM SAVE CURRENT POSITION 
760 X = NX : Y = NY 
780 GOTO 540 

L'instruction PLOT NX, NY de la ligne 680 fait apparaTtre un 
« pave » (autrement dit une balle) dans la couleur indiquee a la 
position nouvelle NX et NY. A la ligne 720 le trace sur X et Y est 
en realite un trace sur les anciennes coordonnees NX et NY qui ont 
ete sauvegardees apres la mise en place du « pave » precedent 
(ligne 760). L'instruction COLOR = de la ligne 720 met en place 
la couleur noire, donnant ainsi I'impression que le pave a ete 
efface. Ceci est du au fait que le trace s'effectue rapidement. 
Naturellement, la boucle suivante replace la couleur courante et 
effectue le trace en NX et NY avec cette couleur (ligne 680). 
L'alternance du noir et de la couleur a chaque boucle ameliore 
I'apparence du mouvement. 

Si vous ne comprenez pas I'ordre de ces instructions, essayez de 
les deplacer et d'executer le programme pour voir ce que cela 
entraine. 



L article entier 

Voici un listing de COLORBOUNCE. C'est exactement le meme 
programme que celui d'APPLESOFT SAMPLER. Listez ce 
programme pour comparer les versions. Vous pouvez soit le lister 
par parties, par exemple avec : 

LIST 400,580 
LIST 600,780 



Construction d'un jeu simple 



soit le lister et utiliser I Ctrl I - S pour stopper et faire repartir le 
listing. Allez, essayez le ! 

400 GR : REM SET COLOR GRAPHICS AREA 
420 HOME : REM CLEAR TEXT AREA 

440 X = : REM SET STARTING POSITION OF BACK-AND- 

FORTH VARIABLE 
460 Y = 5 : REM SET STARTING POSITION OF UP-AND-DOWN 

VARIABLE 
480 XV = 2 : REM SET X VELOCITY 
500 YV = 1 : REM SET Y VELOCITY 
520 REM CALCULATE NEW POSITION 
540 NX = X + XV : NY = Y + YV 

560 REM IF BALL EXCEEDS SCREEN EDGE, THEN BOUNCE 

580 IF NX > 39 THEN NX = 39 : XV = -XV 

600 IF NX < THEN NX = : XV = - XV 

620 IF NY > 39 THEN NY = 39 : YV = -YV 

640 IF NY < THEN NY = : YV = - YV 

660 REM PLOT NEW POSITION 

680 COLOR = 7 : PLOT NX, NY 

700 REM ERASE OLD POSITION 

720 COLOR = : PLOT X, Y 

740 REM SAVE CURRENT POSITION 

760 X = NX : Y = NY 

780 GOTO 540 

En resume, voici comment COLORBOUNCE fonctionne : le 
programme affiche un pave, en efface un, affiche un autre pave, 
une colonne au-dela, efface le precedent et ainsi de suite. Quand le 
bord de I'ecran est atteint (lignes 580-640 quand NX et NY sont 
superieurs a 39 et quand NX et NY sont inferieurs a 0, le 
programme inverse la direction du trace. 



Programme avec intervention des utilisateurs 

Supposons que vous decidiez de modifier COLORBOUNCE de facon 
a introduire une nouvelle couleur de balle a chaque execution du 
programme. Une solution serait de changer la ligne 680, d'executer 
le programme, puis de changer le ligne 680 a nouveau. Mais ce 
serait beaucoup de peine et ce serait difficile a expliquer si vous 
voulez le montrer a un ami. 

Une meilleure methode est d'utiliser I'instruction INPUT pour 
permettre a I'utilisateur d'intervenir dans le programme. Vous avez 
vu dans le Chapitre 2 : qu'une instruction INPUT contient un 
nombre de variables et demande a la personne d'utiliser le 
programme pour entrer quelque chose a partir du clavier. 
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Vous devrez faire tres attention a la maniere de formuler 
I'instruction, car COLOR est un mot reserve. Si par exemple vous 
ajoutez la ligne 

350 INPUT COLOR 

le programme deviendrait mauvais : COLOR ne peut pas etre 
utilise, comme nom de variable. Vous pouvez, cependant, ecrire la 
ligne 350 comme suit : 

350 INPUT "COLOR? "; HUE 

et changer la ligne 680 pour definir COLOR = au moyen de la 
variable HUE : 

680 COLOR = HUE : PLOT NX, NY 

Si vous ne I'avez pas fait, ajoutez ces lignes a COLORBOUNCE. 
Puis executez-le pour voir comment fonctionnent ces lignes. 
(Quand le programme execute la ligne 350, le mot COLOR, suivi 
d'un point d'interrogation (?) apparait sur I'ecran. Le curseur 
restera clignotant jusqu'a ce que quelqu'un tape un nombre et 
appuie sur0 ). 

Vous savez quoi faire quand apparaTt le point d'interrogation, mais 
votre ami peut ne pas le savoir. Ce serait done une bonne idee que 
ce soit le programme qui dise a votre ami, (I'utilisateur), ce qui est 
attendu. L'addition de quelques instructions PRINT et le passage er 
mode TEXT en debut de programme feront I'affaire : 

280 REM SET TEXT MODE 
300 TEXT : HOME 

310 PRINT "TO SELECT A COLOR FOR" 

320 PRINT "THE BOUCING BALL, FIRST TYPE" 

330 PRINT "IN ANY NUMBER FROM 1 TO 15." 

340 "THEN PRESS THE KEY LABELED RETURN." : PRINT 

De meme un message plus specifique accompagnant I'instruction 
INPUT pourrait etre une aide : 

350 INPUT "WHAT COLOR WOULD YOU LIKE THE BALL TO BE 

(1-15)? "; HUE 



Programme avec intervention des utilisateurs 
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Pour I'ecriture de I'instruction INPUT 

• Le message doit etre place entre guillemets dans une instruction 
INPUT. 

• Si I'instruction INPUT comporte un message, I'ordinateur 
n'ajoute pas de point d'interrogation. Si vous voulez qu'un point 
d'interrogation apparaisse, vous devez Tincture dans le message 
accompagnant INPUT. 

La mise en place d'un espace a la suite du point d'interrogation a 
I'interieur des guillemets separe la reponse de la question. 

• II doit y avoir un point virgule entre le message et le nom de 
variable. 

L'addition des nouvelles lignes 280 a 350 a COLORBOUNCE rendra 
le programme beaucoup plus agreable pour les utihsateurs. \\ y a 
cependant encore des pieges potentiels pour les gens qui n ont pas 
I'habitude des ordinateurs. Qu'arrive-t-il si on fait une faute et on 
tape g ? Des messages d'erreur immediats et des sonneries ! 

Si on entre un nombre trop grand ou trop petit, soit le programme 
laissera la balle se deplacer vers le cote droit et s'arretera, soit le 
message 

7ILLEGAL QUANTITY ERROR IN 680 

apparaitra sur I'ecran et le programme s'arretera ensuite. Dans la 
plupart des cas, vos amis ne sauront pas comment relancer 
I'ordinateur - et ils ne devront pas avoir a le faire. Vous devrez 
done faire tester par le programme le nombre tape par I u 'lisateur 
avant de reprendre I'execution. Ainsi les lignes su.vantes le feront . 

370 REM IS HUE OF BALL IN RANGE? 

380 IF HUE > AND HUE < 16 THEN GOTO 400 

390 HOME : PRINT "THAT WASN'T BETWEEN 1 AND 15! : 

PRINT 
395 GOTO 310 

Si le caractere entre n'est pas un nombre, 

17REENTER 
1? 

apparaitra sur I'ecran. Vous apprendrez a modifier le programme 
pour eviter cela au Chapitre 5. 
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C'est une bonne pratique de la programmation qui permet de faire 
un programme aussi confortable que possible. Vous avez atteint le 
stade ou vous avez a ecrire des messages d'erreur qui seront lus 
par d'autres personnes. II est parfaitement normal qu'un 
programmeur comme vous fasse son affaire du jargon du type 
7SYNTAX ERROR, mais un utilisateur innocent ne doit pas le subir. 

Chaque fois que vous utilisez une instruction INPUT, vous devez 
faire tester par le programme I'entree de I'utilisateur de facon a 
eviter tout abandon. La conduite d'un utilisateur non prepare (et 
vous devez prevoir que les utilisateurs ne sont pas des 
programmeurs) est un art en soi. II est toujours necessaire d'utiliser 
des instructions INPUT concues de facon specifique et de tester 
soigneusement la reponse de I'utilisateur. 

Maintenant que vous avez apporte quelques modifications a 
COLORBOUNCE, listez-le a nouveau. Verifiez que vous avez ajoute 
la totalite des nouvelles lignes (280-395), que vous avez change la 
ligne 680, et que toutes les lignes sont tapees correctement. 
Executez la nouvelle version. Puis sauvegardez-la sous le nom de 
NEW COLORBOUNCE. 

Chaque fois que vous sauvegardez une version differente d'un 
programme, vous devez donner a la version un nouveau nom. Sinon la 
vieille version serait ecrasee et perdue. 

Pause 



Production de bruits 

Des dies, des tics, des toes, ainsi que des bourdonnements varies 
sont facilement produits sur I'Apple He. Vous pouvez produire des 
sons sur votre ordinateur si vous le frappez legerement, si vous 
I'egratignez avec vos doigts ou si vous le laissez tomber ; vous 
pouvez egalement en produire en les programmant. 

Pour construire un programme producteur-de-son sur I'Apple He, 
vous avez besoin de cette formule : 

NEW 

150 SOUND = PEEK (- 16336) 

II n'y a pas d'explication simple a cette formule. Le nombre 

- 16336, fait reference a I'adresse memoire du producteur de son 

de I'Apple He et qui est fixee par les circuits electroniques de 

I'ordinateur. 



Production de bruits 
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La fonction PEEK fournit le contenu 
sous forme decimale de I'octet dont 
I'adresse memoire est specifiee par 
I'argument. 



PEEK est une fonction. Dans Applesoft une fonction report un ou 
Dlusieurs nombres, effectue certaines operations sur eux et produ.t 
une valeur unique. Applesoft dispose d'un nombre defini de 
fonctions arithmetiques preetablies (comme SQR, qu: determine la 
IS carr^e d'un Somb?e) ; certaines autres f°n«'ons peuvent e n 
etre derivees. Le Manuel de Reference Applesoft presente toutes 
les fonctions d'Applesoft. 

Le nombre que la fonction utilise (-16336 en ce cas) est appel6 
parametre et il est toujours place entre des parentheses a la suite 
du nom de fonction. Le nombre que la fonction trouye est d.t etre 
renvoye au programme. PEEK renvoie la valeur numerique du 
contenu de n'importe quel octet en memo.re. Vous fournissez 
I'adresse de cet octet quand vous placez le > nombre entre les 
parentheses ; en ce cas I'adresse est - 16336. L' Apple He a des 
adresses memoire qui vont de a 65535. 

L'echelle des adresses memoire est determinee par la taille memoire de 
la macWne L' Apple He a 64 Kilo octets (64K) de memoire, ce qui 
IquJvaui a 65535 octets car 1K represente 2 a la puissance 10 soit 
1.024. 



Pour la plupart des adresses PEEK renvoie seulement une va eur 
numerique, mais a certaines adresses, telles que - 16336, il peut 
declencher quelque chose. En ce cas, il faut faire un cl.c au 
generates de bruit de I'Apple lie. Chaque fois que le programme 
execute cette instruction, vous entendrez un die a peine audible. 
Executez le programme et ecoutez tout pres votre ordinateur. 

Maintenant ajoutez la ligne : 

160 GOTO 150 

et executez le programme. II n'y a pas de probleme pour entendre 
cela ! 

Pour que votre programme provoque un bourdonnement pendant 
une periode limitee de temps, ajoutez ces instructions : 

140 FOR BUZZ = 1 TO 100 
160 NEXT BUZZ 

Un ton est genere par une succession rapide de dies. Les 
programmes qui utilisent PEEK (-16336) plus d une fois 
qenereront certaines sortes de bruits. Comme -16336 est 
ennuveux a taper, il y a une instruction qui vous permettra de 
substituer la variable S au nombre. Ajoutez ceci a votre programme 
de production de son : 



100 s 



16336 
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Pour produire un beau die bien sonore, changez la ligne 1 50 en : 

150 SOUND = PEEK(S) - PEEK(S) + PEEK(S) - PEEK(S) + 
PEEK(S) - PEEK(S) 

Les variations dans le nombre de PEEK de I'instruction entraTnent 
des variations dans les qualites du son. Faites quelques essais. 
Voyez ce qui se produit quand vous n'utilisez que des -PEEK(S)s, 
le changement du son si vous ne mettez que des +PEEK(S)s. 

Pour obtenir un bourdonnement, placez une de vos associations 
dans une boucle. En general, plus la boucle tourne rapidement, plus 
la tonalite est haute. 

Applesoft effectue les operations arithmetiques a differentes vitesses : 
la soustraction est plus lente que I'addition et la division est la plus 
lente. Ainsi la boucle la plus rapide de PEEK est composee en totalite 
de +PEEK(S)s. Une boucle plus lente sera composee de -PEEK(S)s. La 
boucle la plus lente utilisera la division : PEEK(S)/PEEK(S)/PEEK(S) par 
exemple. On trouvera une information plus complete sur PEEK dans le 
Manuel de Reference Applesoft. 



Pour obtenir des tonalites plus elevees sur Apple He, essayez ces 
lignes 

NEW 

40 FOR PAUSE = 1 TO 2500 : NEXT PAUSE 
50 S = PEEK(- 16336) : GOTO 50 

Souvenez-vous que I Ctrl I - C arrete I'execution du programme. 
Comme vous pouvez le supposer, le ligne 40 provoque une pause 
avant I'execution de la ligne 50. L'instruction GOTO de la ligne 50 
entraine un bruit continu apres la pause. 

Afin de faire bon usage de ces methodes de production sonore, 
chargez votre plus recente version de COLORBOUNCE sur 
I'ordinateur. Listez-la et etudiez les lignes. Puis essayez d'ajouter 
un bruit chaque fois que la balle rebondit sur un mur. 

Une solution possible est donnee dans le prochain paragraphe, mais 
essayez d'en realiser une vous-meme. 

Note : Un rebondissement se produit chaque fois que XV et YV change 
de valeur (de signe) et de direction. 
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Bruit de la balle au rebond 

Voici une facon de rendre audible le rebondissement. Ajoutez ces 
lignes a COLORBOUNCE : 

240 REM SET S TO ADRESS OF SPEAKER 
260 S = - 16336 

580 IF NX > 39 THEN NX = 39 : XV = - XV : FOR B = 1 TO 5 : 

BOUNCE = PEEK(S) + PEEK(S) + PEEK(S) : NEXT B 
600 IF NX < THEN NX = : XV = - XV : FOR B = 1 TO 5 : 

BOUNCE = PEEK(S) + PEEK(S) + PEEK(S) : NEXT B 
620 IF NY > 39 THEN NY = 39 : YV = -YV : FOR B = 1 TO 5 : 

BOUNCE = PEEK(S) + PEEK(S) + PEEK(S) : NEXT B 
640 IF NY < THEN NY = : YV = -YV : FOR B = 1 TO 5 : 

BOUNCE = PEEK(S) + PEEK(S) + PEEK(S) : NEXT B 

Vous pouvez voir I'avantage d'avoir plusieurs instructions sur une 
seule ligne dans un programme comme celui-ci. Les sons sont en 
liaisons directes avec les valeurs de XV et YV en sorte que Ton 
voit (avec une execution plus efficace) I'addition a des lignes deja 
existantes. 

Mainteriant essayez vos propres sons. Pourquoi ne pas produire un 
son different pour le rebondissement sur chaque mur ? Quand vous 
aurez trouve la combinaison de sons qui vous plaft, n'oubliez pas 
de sauvegarder une nouvelle version de COLORBOUNCE 
comprenant les lignes de fabrication de bruits. Le reste de ce 
chapitre sera consacre a I'introduction de nouveaux programmes et 
concepts ; nous reviendrons a COLORBOUNCE dans le Chapitre 5. 



Nombres aleatoires 

Voici une autre fonction Applesoft. Essayez-la (sou venez vous que 
vous pouvez I'arreter quand vous voulez avec I Ctrl! - C) : 

NEW 

100 PRINT RND( 1 ) 
110 GOTO 100 
RUN 




Pause 



La fonction numerique RND renvoie 
un nombre reel aleatoire compris 
entre et 1 . 



RND est utilise a la ligne 100 pour "Random". La fonction RND 
fournit des nombres aleatoires. Chaque fois que vous I'executerez, 
vous verrez un echantillon different de nombres. Essayez le ! 
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Les nombres produits par ce programme sont des nombres 
decimaux aleatoires compris entre zero et un. N'importe quel 
argument (le nombre entre parentheses) plus grand que zero 
renverra des nombres decimaux aleatoires compris entre zero et un. 
Essayez, par exemple, de changer la ligne 100 en 

100 PRINT RND (6) 



Bien que vous n'ayiez pas a le faire dans ce guide vous pouvez produire 
differents effets en utilisant un argument nul ou negatif. Voyez le 
Manuel de Reference Applesoft pour une information plus complete. 



Les nombres decimaux aleatoires compris entre un et zero peuvent 
etre malcommodes. Souvent des entiers (des nombres comme 
trois, six, et dix) sont plus faciles a utiljser. Pour obtenir des entiers 
aleatoires entre zero et neuf, vous n'avez qu'a modifier le 
programme. Tapez 

NEW 

90 REM ASSIGNS RND NUMBER TO X 
100 X = RNDd) 
110 REM MULTIPLIES X BY 10 
120 X = X * 10 

130 REM CHOPS OFF THE FRACTION 
140 X = INT(X) 
150 PRINT X 
160 GOTO 100 



La fonction INT renvoie le plus grand 
entier inferieur ou egal a I'argument 
donne. 



La ligne 140 introduit INT, la fonction INTEGER. La fonction X = 
INT(X) renvoie rentier le plus grand inferieur ou egal a X. Par 
exemple, si la valeur de X est 3.6574, INT(X) est egal a 3 ; si la 
valeur de X est -45.12345, INT(X) est egal a -46. Les 
parentheses apres INT peuvent contenir une expression numerique 
ou une variable numerique. 

Maintenant executez le programme.- Fait-il ce que vous attendez ? 

Pour modifier le programme de facon a lui faire generer des 
nombres de un a dix (au lieu de zero a neuf) ajoutez cette ligne a 
votre programme : 



145 X 



X 



1 
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Ce programme peut sembler un peu complique au premier abord. 
Pour voir ce qui se passe pas a pas, ajoutez des instructions 
PRINT Le programme suivant indique comment. Cependant vous 
n'avez pas besoin de les taper. Le programme RANDOM du disque 
APPLESOFT SAMPLER est le meme que celui qui est presente. 

90 REM ASSIGNS RND NUMBER TO X 
100 X = RND( 1 ) : PRINT "X = RND(1 )", X 
105 PRINT 

110 REM MULTIPLIES X BY 10 

120 X = X * 10 : PRINT "X = X * 10", X 

125 PRINT 

130 REM CHOPS OFF THE FRACTION 
140 X = INT(X) : PRINT "X = INT(X)", X 
145 PRINT 

150 REM ADDS 1 TO THE VALUE OF X 
160 X = X + 1 : PRINT "X = X + 1", X 
170 PRINT : PRINT 

180 FOR PAUSE = 1 TO 2000 : NEXT PAUSE 
190 GOTO 100 

Chargez et executez ce programme pour voir ce qui se produit. 
Pour modifier la facon dont les nombres sont affiches, vous pouvez 
enlever la virgule (,') et le X de la fin de la ligne 160, changez la 
ligne 170 et ajoutez la ligne 175 comme ceci : 

160 X = X + 1 : PRINT "X = X + 1" 
170 PRINT X 
175 PRINT 

De facon assez etonnante, ce programme entier peut etre condense 
en seulement une ligne : 

100 PRINT INT (10 * RND(1) + 1 : GOTO 100 

Etudiez cette ligne pour voir comment ces differents elements 
correspondent chacun a des lignes de/RANDOM. 
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Simulation d'une paire de des 

Vous pouvez utiliser maintenant ce que vous avez appris sur les 
nombres aleatoires pour faire un programme representant une paire 
de des : 

NEW 

100 PRINT "WHITE DICE", 

110 PRINT INT(6 * RND( 1 ) ) + 1 

120 PRINT "RED DICE" 

130 PRINT INT(6 * RNDd) ) + 1 

Ce programme produit des entiers aleatoires compris entre un et six 
pour chaque de. Chaque fois que vous executez le programme, 
vous simulez un coup de des. Que pouvez vous ajouter au 
programme pour ne pas avoir a I'executer sans cesse ? Pouvez 
vous ecrire un programme qui utilise ces "des" pour realiser un 
jeu ? Essayez. 

Maintenant essayez d'ecrire un programme d'une ligne qui produit 
des nombres aleatoires compris entre 1 et 50, puis entre et 25. 
Definissez vos propres limites. N'oubliez pas d'ajouter un (1) au 
nombre aleatoire si vous ne voulez pas generer de zeros. 



Conseil utile : Le nombre multipliant RND (comme dans 50 * RND(D) 
represents I'echelle des nombres produits. Le nombre ajoute a RND est 
le plus petit nombre produit : si 1 est ajoute, le plus petit nombre sera 
1 ; si 3 est ajoute, le plus petit nombre sera 3 ; si rien n'est ajoute ; le 
plus petit nombre sera 0. 



Graphiques aleatoires 

Voici une association multicolore de la fonction RND et de quelques 
instructions graphiques : 

NEW 
200 GR 

210 REM CHOOSE A RANDOM COLOR 

220 COLOR = INT (16 * RNDd) ) 

230 REM CHOOSE A RANDOM POINT 

240 X = INT (40 * RNDd) ) 

250 Y = INT (40 * RNDd) ) 

260 REM PLOT THE RANDOM POINT 

270 PLOT X, Y 

280 REM DO IT AGAIN 

290 GOTO 220 
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Essayez d'utiliser RND dans d'autres programmes. Pouvez-vous 
ecrire un programme qui trace des lignes aleatoires dans des 
couleurs aleatoires sur un ecran ? Comment un programme peut-.l 
ombrer un ecran graphique avec des couleurs aleatoires ? 



La fonction RND est utilisee dans beaucoup de jeux . Un e xemple 
d'utilisation un peu plus tongue se trouve dans SCRAMBLEK de 
I'APPLESOFT SAMPLER. Ce programme est represente dans 
I'Annexe E, "Autres Programmes de Jeu". 



Les sous-programmes : assemblage des elements 

Ce paragraphe suit pour un programme la demarche de la pensee 
pas a pas et assemble les elements. Commencons par une idee : 
vous voulez dessiner un cheval qui sera un element de jeu que 
vous allez construire. II y a un programme qui dessine un cheval 
bleu avec des membres oranges et une tete blanche : 



NEW 
1000 



REM DRAW BLUE HORSE WITH WHITE FACE AND ORANGE 
FEET 



1010 GR 

1020 COLOR = 2 : REM DARK BLUE 

1030 PLOT 15,15 

1040 HUN 15,17 AT 16 

1050 COLOR = 9 : REM ORANGE 

1060 PLOT 15,17 

1070 PLOT 17,17 

1080 COLOR = 15 : REM WHITE 

1090 PLOT 14,15 



Un Cheval bleu 



104 
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II n'y a rien de mauvais dans ce programme : il dessine un cheval 
bleu avec des membres oranges et une tete blanche. Mais 
supposons que vous vouliez dessiner un autre cheval quelque part 
ailleurs sur I'ecran. Vous pouvez reecrire le programme en donnant 
de nouvelles valeurs a X et Y, mais, c'est ennuyeux. II devrait y 
avoir une methode pour utiliser le meme programme pour placer 
n'importe ou sur I'ecran une figure sans avoir a la reecrire a chaque 
fois. 

Vous avez appris avec COLORBOUNCE que des variables pouvaient 
etre utilisees pour changer la vitesse et la direction du deplacement 
des points traces sur I'ecran graphique. Une methode analogue 
peut etre utilisee pour changer le cheval de place sur I'ecran. 

Vous pouvez deplacer un point ayant pour coordonnees (A,B) vers 
la droite en ajoutant quelque chose a la premiere coordonnee, A. Si 
A = 4 et B = 17, vous pouvez deplacer le point (A,B) de 
10 colonnes a droite en ajoutant 10 a la premiere coordonnee, le 
transformant en un point (14,1 7). 

De meme, un point se deplace a gauche et si vous retranchez 
quelque chose de la premiere coordonnee (ou lui ajoutez une valeur 
negative). Un simple essai montre qu'en ajoutant ou retranchant 
quelque chose de la seconde coordonnee, on deplace le point vers 
le bas et vers le haut, respectivement. 

C'est la base essentielle de tout programme d'animation. 

A partir de la, vous pouvez reecrire le programme du cheval pour 
positionner le cheval presque n'importe ou sur I'ecran. Pourquoi 
presque n'importe ou ? Parce que si le centre du cheval est trace 
au bord de I'ecran, une partie du cheval sortira de I'ecran. Ceci 
pourrait vous amener un message d'erreur 7ILLEGAL QUANTITY 
ERROR IN 1030. Le numero se trouvant a la fin du message 
d'erreur identifie la ligne sur laquelle se trouve I'erreur : ceci facilite 
la correction par le programmeur. Voici un element du programme 
ameliore : 

NEW 

1000 REM PUT A HORSE ANYWHERE ON THE SCREEN 
1010 COLOR = 2 : REM DARK BLUE BODY 
1020 PLOT X, Y - 1 : REM CENTER OF HORSE 
1030 HLIN X, X + 2 AT Y : REM REST OF BODY 
1040 COLOR = 9 : REM ORANGE FEET 
1050 PLOT X, Y + 1 : REM FRONT FOOT 
1060 PLOT X + 2, Y + 1 : REM REAR FOOT 
1070 COLOR = 15 : REM WHITE HEAD 
1080 PLOT X - 1, Y - 1 



Les sous-programmes assemblage des elements 



Notez que I'instruction GR a ete abandonnee. Cet element de 
programme est suppose placer sur I'ecran plusieurs chevaux. Une 
instruction GR en 1005 viderait I'ecran avant que chaque nouveau 
cheval soit dessine. 

Ce programme ne peut pas etre execute sous cette forme. Vous 
devez initialiser le mode « graphique » et choisir X et Y : 

20 GR 

30 REM FIRST HORSE CENTER 
40 X = 1 2 
50 Y = 35 

Quand vous executez ceci, vous obtenez un cheval a 
I'emplacement desire avant la fin du programme. Mais vous voulez 
encore placer deux chevaux sur I'ecran. Et si vous pouviez ecrire 
ce que vous lisez Figure 4-2 : 



Figure 4-2. Un programme « Et si ». 



60 

70 
80 
90 
100 



DO THE PORTION OF THE PROGRAM AT LINE 1000 
AND THEN COME BACK TO LINE 70 
REM SECOND HORSE CENTER 

X = 33 
Y = 2 

DO THE PORTION OF THE PROGRAM AT LINE 1000 
AGAIN AND THEN END 



GOSUB provoque un branchement 
du programme au numero de ligne 
indique. Le sous-programme 
commence a ce numero de ligne et 
se termine a une instruction 
RETURN, qui entraine en retour le 
branchement du programme a 
I'instruction suivant immediatement 
GOSUB. 

La partie du programme allant de la 
ligne 1000 a la ligne 1090 est 
appelee un sous-programme. Un 
sous-programme est un element de 
programme qui est utilise maintes et 
maintes fois par le programme 
principal (lignes 20 a 100). 



Ne serait-ce pas beau et facile ? Le probleme est que I'ordinateur 
ne peut pas lire les instructions etranges des lignes 60 et 100. II 
peut cependant lire I'instruction 

GOSUB 1000 

Un programme tel que celui qui commence a la ligne 1000 est 
appele un sous-programme. GOSUB 1000 dit a I'ordinateur d'aller 
au sous-programme commencant a la ligne 1000 et cette 
instruction est executee. II dit aussi a I'ordinateur de revenir a la 
ligne qui suit I'instruction GOSUB quand le sous-programme sera 
termine. L'ordinateur sait que le sous-programme est termine quand 
il rencontre I'instruction RETURN. Pour faire un sous-programme 
complet dans votre programme de trace de chevaux, ajoutez la 
ligne 

1090 RETURN 
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En associant toutes ces lignes, vous avez le programme « et si 
vous pouviez seulement » : 

20 GR 

30 REM CHOOSE CENTER OF THE FIRST HORSE 

40 X = 12 

50 Y = 35 

60 GOSUB 1000 

70 REM CHOOSE CENTER OF THE SECOND HORSE 

80 X = 33 

90 Y = 2 
100 GOSUB 1000 
1000 REM PUT A HORSE ANYWHERE ON THE SCREEN 
1010 COLOR = 2 : REM DARK BLUE BODY 
1020 PLOT X, Y - 1 : REM CENTER OF HORSE 
1030 HUN X, X + 2 AT Y : REM REST OF BODY 
1040 COLOR = 9 : REM ORANGE FEET 
1050 PLOT X, Y + 1 : REM FRONT FOOT 
1060 PLOT X + 2, Y + 1 : REM REAR FOOT 
1070 COLOR = 15 : REM WHITE HEAD 
1080 PLOT X - 1, Y - 1 
1090 RETURN 

Si vous executez ce programme, vous obtiendrez le message 
d'erreur suivant : 

7RETURN WITHOUT GOSUB ERROR IN 1090 

Vous decouvrirez bientot comment arreter le programme pour 
eviter cette erreur. Retenez la lecon ! Cependant, en depit du 
message d'erreur, le programme tourne correctement. Vous avez 
bien cree un programme pour dessiner un cheval. Maintenant 
utilisez I'instruction 

GOSUB 1000 

pour dessiner un de ces chevaux speciaux a un quelconque 
emplacement (X,Y) que vous aurez choisi. 



Les sous-programmes : assemblage des elements 



L'instruction de mise au point de 
programme TRACE donne le chemin 
suivi par le programme pensant son 
execution. 



TrdC6 

Pour suivre le deroulement du P^amm^ 

Execution, vous pouvez ff?to nn 6 un 

execute. Ajoutez cette ligne : 



Figure 4-3. Utilisation de TRACE. 
TRACE affiche le numero de ligne de 
chaque instruction a son execution^ 



10 TRACE 

et pour le moment, effacez la ligne 20 avec 

DEL 20,20 

Pour quitter le mode graphique et vider I'ecran. tapez TEXT et 
HOME. Puis executez le programme. 

,10 130 140 #50 #60 # 1 . 1 1 # 1 0^ # 1 

! ? 8 M o° Ve Vh o o Vi o o o Vi °o 1 o #i o f J #1 o 3 o 

^Vi°01 # 0°, 5 1 2 # r, 6 1 3 1 Vi°04 # 1 °, 1 5 # 1 6 # 
^ 7 E ?URN E?T^S?°GDSUB ERROR 

TRACE montre que le P-g-^ue ?uTqura« e eind a re?a n C e 60 'qui 
petit numero de ligne, et cont nue jusqua ' a " e, " are ^ rai S mef rev ient 
Fenvoie au sous-programme II execute I s ° us ^ am . 
au programme principal a la ligne 090 P^^X ligne 1090, 
programme a nouveau. Quand 1 a «^ us a "X \ va a la 9 ligne 1000 
ne trouvant pas de numero de ligne plus P 6 " 1 ' se oduit 

et execute le sous-programme a nouveau^C est a qu ^p^^ ? 
un probleme. Comprenez-vous le message a erre 



Pour remedier au probleme de repetition sans marque de fin, 
ajoutez cette nouvelle ligne au programme : 



L'instruction END entratne I'arret de 
I'execution du programme et donne 
la main a I'utilisateur. 



110 END 

Quand le programme atteint la ligne 110, il ne fera que ce que la 
ligne dit : end. Executez le programme une fois encore. Aucun 
message d'erreur cette fois-ci. Comme l'instruction RETURN 
provoque le branchement du programme a l'instruction suivant 
immediatement le dernier GOSUB execute, la ligne 110 est atteinte 
et le programme s'arrete. 

Comme vous voyez, TRACE est extremement commode quand 
vous avez des problemes avec un programme. En ajoutant TRACE, 
vous pouvez savoir ou se trouve le probleme. 



L'instruction NOTRACE met TRACE 
hors service. 



Si vous voulez ne traiter par TRACE qu'une partie du programme, 
utilisez l'instruction NOTRACE. Ajoutez cette ligne : 



65 NOTRACE 

et la trace du programme ne sera suivie que jusqu'a la ligne 65. 



TRACE peut aussi etre lancee quand vous travaillez sans numero de 
ligne en execution immediate avec TRACE suivi de RUN. Ce n'est pas 
une bonne idee de I'essayer maintenant, a moins de sauvegarder la 
version courante du premier programme de trace de chevaux. 



Une fois que vous aurez lance l'instruction TRACE, que I'execution 
soit immediate ou differee, la trace du programme sera effectuee 
chaque fois que vous I'executerez. Pour arreter TRACE vous devez 
executer une instruction NOTRACE et enlever l'instruction TRACE. 

Maintenant que vous avez termine le suivi de la trace du 
programme de trace de chevaux, executez l'instruction NOTRACE, 
enlevez les lignes 10 et 65 et replacez la ligne 20. De cette facon 
vous pourrez ulterieurement executer le programme sans avoir a 
executer sa trace a chaque fois. 



Un meilleur programme de trace de chevaux 

Ce paragraphe introduit plusieurs complements et modifications an 
programme de trace de chevaux. Les modifications sont basees sur 
des techniques qui seront utiles pour tous vos programmes futurs. 
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Les erreurs 

II est important de prevoir les erreurs possibles quand on ecrit . des 
du type suivant : 

1000 REM PUT A HORSE ANYWHERE WITHIN SCREEN 
1012 IF X < 1 THEN X = 1 
1014 IF X > 37 THEN X = 37 
1016 IF Y < 1 THEN Y = 1 
1018 IF Y > 38 THEN Y = 38 

Le format de ces lignes devrait vous etre familier : il est semblable 
^ut ife dans 9 COLORBOUNCE. Pour garter ^ chevaux a 

a 37 ?). 

orlneau a I'avantage de ne pas arreter le programme. 

MntP 7 nue la liane 1000 est legerement differente de I'ancienne 
Hgne 1000 teresi des lignes" est a ajouter au sous-programme. 

Les Variables 

Comme vous vous en etes deja rendu compte, ('utilisation de 
vaTables a'u lieu des affectations ^ numeros specif, que aux 
couleurs, rend un programme plus souple Si, par exempie^ vo 
desirez ajouter un second oueur au jeu et donner a ce joueur un 
chevafd'une couleur differente, vous pourrez remplacer la ligne 
1010 COLOR = 2 par 

1010 COLOR = BODY 

De meme, vous pourrez ecrire : 

1040 COLOR = FEET 
1070 COLOR = FACE 
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Alors le programme principal deviendrait 



20 GR 

30 REM FIRST PLAYER'S HORSE COLOR 
40 BODY = 2 : REM DARK BLUE 
50 FEET = 9 : REM ORANGE 
60 FACE = 15 : REM WHITE 
70 REM FIRST PLAYER'S HORSE CENTER 
80 X = 15 
90 Y = 30 
100 GOSUB 1000 

et ainsi de suite. Maintenant vous ajoutez les lignes pour la couleur 
du cheval du second joueur. N'oubliez pas d'inclure une instruction 
END. Executez le programme pour voir les deux chevaux s'afficher. 
Changez les lignes de votre programme jusqu'a obtenir les 
associations de couleurs que vous aimez. 



C'est une bonne occasion d'utiliser quelques unes des finesses de 
I'editeur que vous avez appris dans le Chapitre 3, « Modification de 
programmes ». Un des avantages de I'utilisation du mode escape est 
que vous pouvez lister une ligne qui apparaft sous une forme semblable 
plus d'une fois dans le programme, faire les modifications prevues, et 
la copier en vue d'une reproduction facile. Essayez le maintenant — 
cela vous economisera beaucoup de frappe. 



Sous-programmes complementaires 

Pour affiner encore davantage le programme de trace de chevaux, 
utilisez des sous-programmes qui affectent les couleurs pour le 
cheval de chaque joueur et qui, a leur tour, iront chacun au sous- 
programme de trace de cheval (ou I'appelleront). Voici deux 
exemples : 

2000 REM DRAWS BLUE HORSE WITH ORANGE FEET AND WHITE 
FACE 

2010 BODY = 2 : REM DARK BLUE 
2020 FEET = 9 : REM ORANGE 
2030 FACE = 15 : REM WHITE 
2040 GOSUB 1000 
2050 RETURN 

2500 REM DRAWS ORANGE HORSE WITH PINK FEET AND GREEN 
FACE 

2510 BODY = 9 : REM ORANGE 
2520 FEET =11: REM PINK 
2530 FACE = 4 : REM GREEN 
2540 GOSUB 1000 
2550 RETURN 
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Quand vous ajoutez les sous-programmes 2000 at 2500 vous 
devez aussi changer le programme pnncipa ■ Po« Jr P la oe r un 
bleu avec une tete blanche et des pattes orange en (1U, id, 
changez comme suit les lignes 30 a 60 : 

30 REM FIRST PLAYER'S HORSE 

40 X = 10 

50 Y = 1 1 

60 GOSUB 2000 

Pour placer un cheval orange en (19,2), remplacez les lignes 
70-100 par : 

70 REM SECOND PLAYER'S HORSE 
80 X = 19 
90 Y = 2 
100 GOSUB 2500 

Les sous-programmes du trace de chevaux des lignes 2000 et 
2500 appellent un autre sous-programme qu, , ^^"^ "gj 
1000 Les choses deviennent tout a fait efficaces a ce stade- i.es 
trofs sous programmes rendent tres facile la mise en place d un 
attrayant affichage de chevaux. 

Mais d'abord, un autre sous-programme commode qui remplace les 
anciennes lignes 1012-1018 : 

3000 REM CHOOSES A RANDOM PAIR OF COORDINATES 
3010 X = INT (RND(1) * 37)+ 1 
3020 Y = INT (RND(1) * 38) + 1 
3030 RETURN 



Un programme bien structure 

Voici le proqramme entier. II associe le programme principal aux trois 
sous-pr^ Vous pouvez modifier le programme que vous 

Ivez tap! pour le mettre en accord avec ce que vous voyez ou 
cha gez HORSES a partir de I'APPLESOFT SAMPLER. 



Du Graphique 



10 REM SET GRAPHICS MODE 
20 GR 

30 REM CHOOSE A RANDOM POINT 
40 GOSUB 3000 

50 REM PUT A BLUE HORSE THERE 
60 GOSUB 2000 

70 REM CHOOSE ANOTHER RANDOM POINT 
80 GOSUB 3000 

90 REM PUT AN ORANGE HORSE THERE 
100 GOSUB 2500 
110 REM DO IT ALL AGAIN 
120 GOTO 30 

Voici comment se presente un programme principal si vous ecrivez 
des programmes bien structures : principalement des instructions 
REM et GOSUB. Le travail doit etre fait dans des sous-programmes 
relativement courts, chacun etant facile a ecrire et un tout en soi. 



L'Annexe E donne plus d'exemples de sous-programmes et indique 
comment les structurer pour avoir le maximum d'efficacite dans le 
programme. 



Si les taches de ce programme ne sont pas encore tout a fait 
claires, utilisez TRACE pour suivre le deroulement du programme. 
Tapez TEXT et HOME. Puis ajoutez 

5 TRACE 
130 NOTRACE 

ensuite, RUN. Comparez ce que vous voyez sur I'ecran avec le 
listing du programme jusqu'a ce que vous puissiez suivre les sous- 
programmes. 

Pause 



Graphique haute resolution 

Jusqu'ici vous avez utilise des graphiques basse resolution. Dans 
ce paragraphe sera introduit une autre espece de graphique appele 
graphique haute resolution. 

Le graphique haute resolution vous permet de dessiner avec 
beaucoup plus de details que ce que Ton peut avoir avec la grille 
basse resolution. L'ecran du graphique haute resolution a une 
definition de 280 sur 160 points pour le trace. La coordonnee 
horizontal part de a gauche de l'ecran et va jusqu'a 279 a 
droite. De meme la coordonnee verticale va de au sommet de 
I'ecran jusqu'a 1 59 en bas. 



Graphique haute resolution 



Figure 4-4. Coordonnees d'un ecran 
Graphique haute resolution. 
L'echelle des coordonnees 
horizontals va de a 279 ; 
l'echelle des coordonnees verticales 
va de a 159. 
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Les commandes du graphique haute resolution sont souverrt »es mem 9 s 
aue cedes correspondantes du graphique basse resolut .ion a part 
r addition d'un H (pour « high » resolution). Votre familiarisation avec le 
graphique basse resolution vous aidera dans ce paragraphe. 



Le graphique haute resolution, 
initialise par HGR utilise une grille 
ecran avec une definition de 280 sur 
168 points, et laisse quatre lignes 
pour le texte en bas de I'ecran. HGR 
vide I'ecran et le met en noir. 



Tapez 

HGR 

pour obtenir le graphique haute resolution. Cette ' inrtwction vide 
recran, le met en noir et laisse quatre l.gnes en bas pour le texte. 
Comme le graphique basse resolution, le graphique haute resolution 
vous permit d'utHiser des coordonnees verticales que vous mettrez 
Sans fa zone texte (191 est le maximum) mais ces points ne sont 
pas apparents sur I'ecran a moins que vous fassiez chines 
manoeuvres subtiles. Voyez le Manuel de Reference Applesoft pour 
plus d'information. 



Conseil Utile : Si le curseur n'est pas visible, tapez jusqu'a ce que le 
curseur apparaisse pres du bas de I'ecran. 



HCOLOR= place la couleur du 
graphique haute resolution au 
numero specifie. 



La couleur des points que vous tracez avec te graphjque haute 
resolution est determinee par ['instruction "COLOR-. Comme pour 
le graphique basse resolution, I'Apple lie utilisera la couleur 
assignee jusqu'a ce que vous en changiez. 
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Le graphique haute resolution est vraiment etonnant, mais vous 
devrez faire quelques sacrifices pour I'utiliser. II y a peu de 
numeros attribues a HCOLOR= et les couleurs varient en fonction 
de leurs positions sur I'ecran. Voyez la figure 4-5 pour savoir quel 
numero va avec quelle couleur. 



Figure 4-5. Graphique haute 
resolution 
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Pour essayer le graphique haute resolution une fois que vous avez 
lance I'instruction HGR tapez 

HCOLOR = 2 
HPLOT 130,100 
HPLOT 50,50 

et ainsi de suite. Remarquez comme les points traces en haute 
resolution apparaissent beaucoup plus petits. Ce mode rend 
possible la creation d'images avec beaucoup plus de details que ce 
qu'on pouvait obtenir en basse resolution. 



Figure 4-6. La bonne resolution de 
I'ecran en mode HGR. 




L'instruction HPLOT trace des 
points et des lignes en graphique 
haute resolution en utilisant la 
valeur la plus recemment specifiee 
de HCOLOR 



Le trace des lignes est meme plus facile avec le graphique haute 
resolution qu'avec le graphique basse resolution. Vous utilisez 
simplement HPLOT a partir d'un point de I'ecran jusqu'a un autre 
point. Pour tracer une ligne le long du bord haut de I'ecran, tapez 

HCOLOR = 1 
HPLOT 0,0 TO 279,0 



116 



Du graphique 



Si vous desirez tracer une ligne allant du coin de coordonnee 279, C 
au coin bas de I'ecran, tout ce que vous avez a faire est de taper 

HPLOT TO 279,159 

et une ligne apparait le long du bord droit de I'ecran. Quand vous 
utilisez cette derniere instruction, la nouvelle ligne prend son point 
de depart du dernier point trace et utilise la couleur de ce point 
(meme si vous avez lance une nouvelle commande HCOLOR = 
depuis que ce point a ete trace). Pour le voir vous meme tapez 

HCOLOR = 4 
HPLOT TO 0,159 

La couleur 4 est le noir ; ainsi vous pourriez penser que la ligne 
n'apparaTtra pas. En fait elle apparait car elle prend la couleur du 
point de depart qui est le vert (numero 1 ). 

Vous pouvez aussi associer plusieurs lignes dans une instruction 
HPLOT. Videz I'ecran avec HGR et essayez ceci sur I'Apple He : 

HCOLOR = 3 

HPLOT 0,0 TO 279,0 TO 279,159 TO 0,159 TO 0,0 

II y aura une ligne bordant I'ecran tout autour comme le montre la 
figure 4-7. S'il n'y a pas une ligne continue autour de I'ecran, 
verifiez ce que vous avez tape. 



Figure 4-7. Une ligne tout autour et 
au bord de I'ecran haute resolution. 




Si la ligne du haut n'est pas visible sur votre ecran, votre television 
ou votre moniteur video ont besoin d'un reglage Essayez de le 
regler. Si cela ne va pas, remplacez HPLOT 0,0 TO 279,0 par 
HPLOT 0,2 TO 279,2 et ainsi de suite. 

Vous voyez comme il est facile de tracer des lignes droites en 
haute resolution. Eh bien, les lignes diagonales sont tout aussi 
faciles. Pour tracer une ligne depuis le coin haut et gauche de 
I'ecran jusqu'au coin bas et droite, tapez : 

HPLOT 0,0 TO 279,159 

Tracez des lignes en haute resolution de longueurs et couleurs 
variees Vous decouvrirez que certaines couleurs ne donnent pas 
touiours des lignes verticales sur les moniteurs en noir et blanc. Les 
couleurs 2 et 6 seules tracent des lignes verticales si on commence 
par des nombres pairs, tandis que 1 et 5 seulement tracent des 
liqnes en commencant par des nombres impairs. Par exemple si 
HCOLOR = 1, HPLOT 279,0 TO 279,159 trace une ligne verticale, 
HPLOT 2 159 TO 0,0 ne le fera pas. Ceci est du au mode 
d'interpretation des couleurs en mode haute resolution par les 
moniteurs en noir et blanc. 

Pour voir un exemple de ce que vous pouvez faire avec le 
graphique haute resolution, chargez le programme MOIRE: 
H'APPLESOFT SAMPLER. Executez-le ; arretez le programme avec 
[CtTfj- C. Puis tapez TEXT, HOME, et LIST pour voir les lignes du 
programme. 

Figure 4-8. MOIRE. Listing du ^ NFW 

programme. Les numeros 1 et 2 8Q Rf _ M mqirf. PROGRAM 

correspondent a ceux du texte. on HOMF 

100 V TAB 24 : REM MOVE CURSOR 10 BOTTOM LINE 
20 HGR REM SE1 HIGH RESOIU I ION GRAPHICS 

140 A = RNDU) * 279 : REM PICK AN X FOR 

160 B C = N R T ND(D * 159 : REM PICK A Y FOR "CENTER" 
180 N = INT (RND( 1 ) * 4) + 2 : REM PICK A 
STEP SIZE 

g8 FOR V= P T R O N 2 T 78 S S T T E E P P P 'n NG S %THFJ , A VALUES 
240 FOR S = TO 1 : REM 2 LINES, FROM X AND 

260 HCOLOR = 7 * S : REM FIRST LINE BLACK, NEXT 

! -280 REM T DRAW LINE THROUGH "CENTER" TO OPPOSITE SIDE 



300 HPLOT X + S,0 TO A,B TO 279 - X - S.159 
~340 FORY S = X TO 158 STEP N : REM STEP THRU B 

360 FOR U S E = TO 1 : REM 2 LINES, FROM Y AND 

380 HCOLOR = 7 * S : REM FIRST LINE BLACK, NEXT 
-400 REM T DRAW LINE THROUGH "CENTER" TO OPPOSITE SIDE 

420 HPLOT 279, Y + S TO A,B TO 0,159 - Y - S 

"460 FOR "pAUSE = 1 TO 1 500 : NEXT PAUSE : REM DELAY 
480 GOTO 120 : REM DRAW A NEW PATTERN 
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1 . Le centre de I'ecran haute resolution est a I'intersection de 
quatre points tracables, et il ne peut pas etre visualise avec 
precision. Ainsi « CENTER » des lignes 280 et 400 est 
approche. 

2. Une instruction NEXT peut etre relative a plus d'une 
instruction FOR, comme vous le voyez dans les lignes 320 et 
440. Veuillez bien placer les variables du NEXT dans le bon 
ordre pour eviter de croiser les boucles. 

Pouvez vous reflechir aux facons de modifier le programme ? Par 
exemple, essayez de changer la valeur de HCOLOR= de facon 
aleatoire. Essayez de tracer des lignes oranges puis bleues ou 
seulement des lignes bleues. 

Le mode haute resolution contient bien d'autres possibilites que 
celles presentees ii i Quand . ous vous sentirez a I'aise pour utiliser 
les instructions graphiques haute resolution presentees dans ce 
paragraphe, referez vous au Manuel de Reference Applesoft pour 
avoir plus d'information sur le graphique haute resolution. 



Graphique haute resolution 



Resume du chapitre 



Instructions 



Termes 



PEEK 
RND 
INT 

GOSUB 

TRACE 

NOTRACE 

END 

HGR 

HCOLOR = 
HPLOT 



adresse 

fonction 

octet 

kilo octet 

memoire 

sous-programme 

programme 

graphique haute resolution 
Messages d'erreur 



7REENTER 

7RETURN WITHOUT GOSUB 
ERROR 
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Chapitre 5 

Chafnes de caracteres et 
tableaux 



Les ordinateurs peuvent manipuler des lettres et des symboles 
aussi bien que des graphiques et des nombres. Dans ce chapitre 
vous apprendrez comment I'Apple He manipule des chafnes entieres 
de caracteres. Vous en saurez egalement plus sur la facon dont il 
stocke des caracteres et des nombres dans ce qui est appele des 
tableaux. 



Enchafnons les caracteres 

Une chame de caracteres, ou suite de caracteres, est une variable. 
Les noms des variables chame de caracteres suivent les memes 
regies que les noms des variables numeriques sauf qu'ils sont tous 
termines par le caractere dollar ($). Voici quelques exemples de 
noms de variables chaine de caracteres : 



A$ 

MYNAME$ 
SENTENCES$ 



Vous avez deja utilise une variable chame de caracteres sans le 
savoir. Dans le programme WELCOME au Chapitre 2, N$ etait 
utilise comme variable chaine pour stocker votre prenom. Regardez 
le programme maintenant. N$ est un bon exemple de ce que font 
les variables chatne : retenir chaque fois qu'un caractere (lettre) est 
entre au clavier et utiliser les memes caracteres dans un message 
pour I'utilisateur. Les variables chaine peuvent encore faire autre 
chose, continuez a lire. 

Les variables numeriques (comme A) sont differentes des variables 
chame (comme A$) : A ne peut contenir qu'un nombre (I'age de 
quelqu'un, par exemple) alors que A$ peut contenir une chaine de 
caracteres (le nom de quelqu'un par exemple). On peut utiliser les 
deux dans le meme programme. 
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Les chaTnes de caracteres peuvent prendre toutes sortes de noms, 
aussi longs que Ton veut pourvu qu'ils se terminent par un signe 
dollar. Si vous voulez une variable chaTne contenant les lettres 
HARRY S TRUMAN, vous pouvez utiliser la variable 

A$ = "HARRY S TRUMAN" 

ou 

NAME$ = "HARRY S TRUMAN" 

Les caracteres que vous mettez dans la variable chaTne doivent etre 
encadres par des guillemets. L'instruction 

PRINT NAME$ 

imprimera le contenu de la variable NAME$ : dans ce cas le nom du 
33 e President des Etats-Unis. 



Fonctions chaines de caracteres 

II existe de nombreuses instructions qui manipulent des chaines. 

Supposons que vous vouliez connaitre la longueur d'une chaTne de 
La fonction chaTne LEN renvoie le caracteres (c'est-a-dire le nombre de caracteres qu'elle contient), 
nombre de caracteres contenus vous pouvez utiliser la fonction longueur, LEN, en tapant 

dans la chaTne (specifie entre 
parentheses), ce nombre etant 

compris entre et 255. PRINT LEN ("HARRY S TRUMAN") 

ou alors vous pouvez taper l'instruction equivalente 

PRINT LEN (NAME$) 

et Applesoft affichera la longueur de la chaTne. Comme vous 
pouvez le voir (verifiez en comptant vous-meme) la longueur de la 
chaine NAME$ est 14. Souvenez-vous que le micro-ordinateur 
compte les espaces et la ponctuation comme des caracteres. 

Le nombre de caracteres varie de a 255. Plus de 255 caracteres 
par chaTne produisent I'arret et I'un des messages d'erreur 
'STRING TOO LONG ERROR ou 7SYNTAX ERROR. Une chaTne sans 
caractere est une chaine vide. L'ordre RUN provoque la 
reinitialisation des variables a zero, et remplace les chaines par des 
chaTnes vides. Chaque chaTne doit done etre definie en debut de 
programme. 
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La fonction de chaTne de caracteres 
LEFT$ renvoie le nombre specifie de 
caracteres les plus a gauche de la 
chaTne. 



Dans certaines occasions peut-etre, vous voudrez afficher 
uniquement une partie de la chaTne de caracteres contenue dans 
NAME$. Pour faire cela, vous disposez de trois fonctions de 
chaines de caracteres a votre disposition : LEFT$, RIGHT$, et 
MID$. 

Si par exemple, vous voulez imprimer les cinq premieres lettres de 
NAME$, tapez 

PRINT LEFT$ (NAME$,5) 

et 



HARRY 



La fonction de chaTne de caracteres 
RIGHT$ renvoie le nombre specifie 
de caracteres les plus a droite de la 
chaine. 



sera affiche sur I'ecran. Les raisons pour lesquelles vous voulez 
faire cela deviendront bientot claires. Si vous tapez 

PRINT RIGHT$ (NAME$,5) 



RUMAN 



La fonction de chame de caracteres 
MID$ renvoie le corps de chaine 
specifie entre parentheses. 



apparaitra. 

Voici un court programme qui utilise les fonctions LEN et LEFT$. 

NEW 

90 NAME$ = "HARRY S TRUMAN" 
100 FOR N = 1 TO LEN(NAME$) 
110 PRINT LEFT$(NAME$,N) 
120 NEXT N 

Executez ce programme. 

Maintenant, ecrivez un autre programme en substituant RIGHT$ 
par LEFT$. La fonction RIGHT$ fonctionne comme LEFT$ a ceci 
pres qu'elle donne les caracteres les plus a droite de la chaTne. Que 
se passe-t-il lorsque vous I'executez ? 

Pour extraire des caracteres situes a I'interieur de la chaTne, vous 
disposez de la fonction MID$. Tapez 

PRINT MID$(NAMES$,7) 

et I'Apple lie repondra avec 
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S TRUMAN 

parce que S est le septieme caractere dans la chaine. Pour 
comprendre comment la fonction MID$ opere sur le programme, 
editez la ligne 1 10 pour lire 

110 PRINT MID$ (NAME$,N) 

Avez-vous obtenu ce que vous attendiez en lancant le 
programme ? 

Supposez que vous ne vouliez extraire que Y, S et T de la chaine 
appelee NAME$. Pour cela, il est necessaire d'ajouter un autre 
argument a la fonction MID$. 

PRINT MID$ (NAME$,5,5) 

Le second argument qui vaut 5 indique la position du premier 
caractere a extraire. Le troisieme argument indique le nombre de 
caracteres a extraire. Applesoft interprete cette instruction 
comme : « trouvez le cinquieme caractere dans NAME$ et 
imprimez cinq caracteres en commencant au cinquieme et en vous 
deplacant vers la droite ». 



Le premier argument d'une instruction MID$ specifie le caractere dans 
la chaine (pas forcement une lettre parce que la ponctuation et les 
espaces sont comptes comme des caracteres) ou MID$ commencera. 
Si un seul argument est donne, MID$ renverra les caracteres a partir du 
premier nomme jusqu'a la fin de la chame. Le second argument, qui est 
facultatif, indique le nombre de caracteres a extraire. 



Maintenant changez encore la ligne 1 10, comme suit, et executez 
a nouveau. 

110 PRINT MID$ (NAME$,N,6) 

N'allez pas plus loin dans ce livre si vous n'avez pas essaye les 
fonctions LEFT$, RIGHT$, et MID$. 

Pratique de programmation habituelle utilisant les 
chafnes de caracteres 

Le programme ALPHABET sur le disque d'exemple Applesoft 
illustre quelques pratiques usuelles de programmation utilisant les 
chaines de programmation. Chargez-le et listez-le maintenant. 

La meilleure facon pour comprendre le fonctionnement de ce 
programme est de I'etudier soigneusement. Regardez bien ce que 
represente chaque variable et comment elles sont utilisees. Voyez 
ensuite les techniques de programmation montrees dans la figure 
5-1. 
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Figure 5-1. Le programme 
ALPHABET : pratique courante de 
programmation. Les numeros dans 
I'illustration correspondent a ceux 
du texte. 



NEW 

190 REM THE ALPHABET PROGRAM 

200 A$ = "ABCDEFGHIJKLMNOPQRSTUVWXYZ" 

210 PRINT 

-220 PRINT "TYPE A NUMBER, FROM 1 THROUGH ";LEN 
<A$);"," 

230 PRINT "AND I WILL TELL YOU WHICH LETTER HAS 

THAT POSITION IN THE ALPHABET. "; 
240 INPUT P 

250 IF P > LEN(A$) OR P < 1 THEN GOTO 210 
260 PRINT 

-270 PRINT MID$ (A$,P,1);" IS LETTER NUMBER ";P; 

" IN THE ALPHABET." 
-280 PRINT : PRINT 

290 PRINT "TYPE A LETTER, AND I WILL TELL YOU " 
300 INPUT "WHERE IT IS IN THE ALPHABET. ";X$ 
-320 FOR N = 1 TO LEN(A$) 
330 IF MID$ (A$,N,1) = X$ THEN GOTO 380 
340 NEXT N 
350 PRINT 

360 PRINT "THAT IS NOT A LETTER OF THE ALPHABET.' 

PRINT 
370 GOTO 290 
380 PRINT 
390 PRINT X$; ' 

ALPHABET. 
-400 PRINT 
410 GOTO 210 



IS LETTER NUMBER ";N;" IN THE 



1. LEN(A$) determine la longueur de la chaine de caracteres, c'est- 
a-dire le A$ nombre qu'elle contient. Quand A$ change, LEN(A$) 
egalement. Ceci donne davantage de souplesse au programme et 
vous permet de definir un alphabet different sans avoir a changer I 
suite du programme. 

2. L'instruction MID$ a la ligne 270 est interpretee comme 

« commencer au premier caractere dans A$, alter au P (nombre 
entre par I'utilisateur) et afficher un caractere ». C'est de cette 
facon que le programme identifie la lettre de I'alphabet qui a la 
position specifiee par P. 

3. Remarquez I'utilite des espaces vides dans les instructions 
PRINT. Qu'arriverait-il a I'affichage sans ces espacements ? (Si 
vous n'en etes pas sur, essayez d'en changer quelques-uns et 
regardez ce qui se passe quand vous executez le programme). 

4. Le programme utilise une boucle pour trouver la position d'un 
caractere dans une chaine. Cette methode d'utilisation d'une 
boucle pour analyser une chame de caracteres, pas a pas, est 
communement utilisee. 

Executez ALPHABET maintenant. Puis essayez de modifier la ligne 
200, et executez-le de nouveau. Vous etes libre de modifier ce 
programme comme il vous plaira. 
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Duplication de chaines de caracteres 

Vous pouvez dupliquer une chame de caracteres en utilisant un 
ordre d'affectation comme 

X$ = A$ 

Cette instruction recopie le contenu de A$ dans X$. Cependant 
vous ne pouvez pas utiliser une notation partielle de chame dans un 
ordre d'affectation. Par exemple, I'instruction 

MID$ (X$,3,3) = "XYZ" 

n'est pas permise, mais I'instruction 

X$ = MID$ (A$,24,3) 

est permise. L'argument de gauche dans une instruction 
d'affectation doit etre une variable. 



Epelons a I'envers 

Vous plairait-il que I'Apple He epelle votre nom a I'envers ? He bien, 
c'est possible, grace, par exemple, au programme suivant 

NEW 

100 REM PROGRAM TO SPELL YOUR NAME BACKWARD 
110 INPUT "TYPE YOUR NAME AND I WILL SHOW IT 

TO YOU SPELLED BACKWARD. "; N$ 
120 REM REVERSE ORDER OF LETTERS 
1 30 FOR T = LEN(N$) TO 1 STEP - 1 
140 R$ = R$ + (MID$ (N$,T,1)I 
150 NEXT T 

160 PRINT : PRINT "YOUR NAME SPELLED BACKWARD 

IS " ' R $ 
170 PRINT : PRINT 
180 GOTO 110 
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CLEAR met toutes les variables, y- 
compris les chames et les tableaux, 
a zero. II est tres ingenieux de 
I'utiliser dans un programme. 



Executez ce programme, en essayant des noms differents. Apres 
plusieurs executions vous vous apercevrez que parfois c'est faux. 
La ligne 140 est la cle du probleme. Si, par exemple, vous entrez 
SALLY, la variable N$ devient SALLY et la variable R$ devient 
YLLAS. Essayez. Quand le programme retourne a la ligne 1 10 et 
vous demande votre nom a nouveau, tapez JOE. Cela va initialiser 
N$ avec JOE mais I'ancienne variable R$ est toujours en memoire 
et par consequent la ligne 140 met dans R$, I'ancien R$ plus N$ 
epele a I'envers. A la place de EOJ (JOE a I'envers) vous verrez 
s'afficher YLLASEOJ. 

Que faut-il faire pour annuler les variables chaTnes comme R$ pour 
les reinitialiser a chaque GOTO. Cela peut heureusement se faire 
avec Applesoft. Nous pouvons utiliser la chaine vide pour vider le 
contenu de R$. Ajoutez cette ligne au programme : 

175 R$ = "" 

Maintenant executez le programme a nouveau. En utilisant la 
chaine vide a la fin du programme, le contenu de R$ peut etre 
annule apres que le nom ait ete epele a I'envers. Ainsi, quand le 
programme revient a la ligne 1 10 et recommence, R$ prendra la 
valeur du nouveau nom au lieu de le rajouter a I'ancien et d'affiche 
tous les anciens noms qu'on lui avait donne. 

L'instruction CLEAR d'Applesoft, reinitialise toutes les variables de 
taille et de forme differentes, mais ne devrait etre utilisee qu'en 
mode d'execution immediat. 

N = 254 
PRINT N 

Maintenant tapez 

CLEAR 
puis 

PRINT N 

Votre micro-ordinateur vous donne-t-il comme valeur de N ? 
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II est possible de rajouter une seconde chaTne de caracteres a la fin 
d'une chaTne existante en utilisant le signe plus ( + ). Ce procede 
est appele concatenation. Essayez ce qui suit : 

C$ = "GOOD MORNING" 
D$ = C$ + ", " + "BILL" 



L'Apple lie repondra 



GOOD MORNING, BILL 



La concatenation est specialemenf utile si vous souhaitez prendre 
une chaTne de caracteres separee et la rattacher ensuite apres 
I'avoir modifiee. Par exemple pour creer une nouvelle chaTne 
contenant les memes caracteres que dans D$, mais dans un ordre 
different, tapez 

E$ = RIGHT$ (D$,4) + MID$ (D$,13,2) + LEFT$ (D$,12) 
PRINT E$ 

et 



BILL, GOOD MORNING 



apparaTtra sur votre ecran. Maintenant voila un programme qui 
montre une bonne utilisation de la concatenation : 

NEW 

100 INPUT "GIVE ME ABOUT HALF OF A SENTENCE. "; HALF$ 
105 PRINT 

110 INPUT "NOW GIVE ME THE SECOND HALF OF THE 

SENTENCE. "; OTHERHALF$ 
120 WHOLE$ = HALF$ + " " + OTHERHALF$ 
130 PRINT 
140 PRINT WHOLE$ 
150 PRINT : PRINT : PRINT : GOTO 100 

Voila comment vous faites une concatenation. Essayez de changer 
le blanc de la ligne 120. Qu'arrive-t-il alors aux deux demi- 
phrases ? 



L'annexe E presente une version plus complexe de melange de phrases 
et donne davantage d'indications avec I'affichage du programme. 
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La fonction VAL essaie d'interpreter 
une chafne, jusqu'au premier 
caractere non numerique, comme un 
nombre entier ou reel et renvoie la 
valeur de ce nombre. 
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Encore des fonctions de chaines de caracteres 

Les chaines de caracteres peuvent contenir presque tous les types 
de caracteres, y compris des nombres. Cependant, les caracteres 
entre guillemets dans une chaine ne peuvent etre interpretes 
numeriquement, meme si ce sont des nombres. Tapez 

C$ = "123" 
PRINT C$ + 7 

L'Apple He repondra ?TYPE MISMATCH ERROR. Cependant, la 
fonction VAL (abreviation de value) peut resoudre ce probleme. La 
fonction VAL renvoie la valeur du contenu d'une chatne par 
opposition a son contenu actuel. Tapez 

PRINT C$ 
puis tapez 

PRINT VAL(C$) 

Les deux instructions produisent apparemment le meme resultat, 
cependant ne vous y fiez pas. Vous avez deja vu que si vous tapez 

PRINT C$ + 5 

votre ordinateur repondra par ?TYPE MISMATCH ERROR. Essayez 
de taper 

PRINT VAL(C$) + 5 
et 
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PRINT VAL(C$) + 5 
1128 



apparaTtra sur I'ecran. Notez que le nom de la variable chafne qui 
est I'argument de la fonction VAL doit etre entre parentheses. 
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Que se passe-t-il si vous voulez mettre la valeur de C$ - 21 dans 
une variable numerique ? Tapez seulement 

Q = VAL(C$) - 21 
Maintenant tapez 

PRINT Q 

et voyez ce que vous obtenez. Le contenu de Q est-il ce que vous 
attendiez ? Vous pouvez meme utiliser la fonction VAL pour 
additionner les valeurs numeriques de deux chaines de caracteres. 
Pour essayer cela, creez une nouvelle chaTne : 

K$ = "12" 
puis tapez 

P = VAL(C$) + VAL(K$) 
PRINT P 

Essayez la fonction VAL avec differentes chaines, meme avec des 
chaines qui commencent ou finissent avec des lettres. 

II est parfois necessaire de changer un nombre en une chaine. La 
fonction STR$, qui agit de la meme facon que VAL mais a 
I'inverse, peut etre utilisee pour faire ce changement. Supposons 
que vous vouliez transformer la variable numerique P en une 
variable chame, tapez 

P$ = STR$(P) 
PRINT P$ 

pour voir comment agit la fonction STR$. 

STR$ est specialement utile pour forma ter du texte a I'ecran. Vous 
pourriez utiliser STR$, par exemple, pour aligner toutes les virgules 
decimales dans une serie de nombres. Votre programme 
convertirait chaque nombre en variable chaine et utiliserait les 
fonctions LEN, MID$ et HTAB pour aligner chaque entree. 

Le programme DECIMAL qui se trouve sur la disquette d'exemples 
Applesoft fait justement cela. Executez-le et regardez votre listing 
et la figure 5-2 pour voir comment il travaille. Ce programme 
contient une quantite de remarques pour vous aider a comprendre 
les fonctions des diverses instructions. 



La fonction de chaine de caracteres 
STR$ renvoie une chaTne qui 
represente la valeur de I'argument. 
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Figure 5-2. Le programme 
DECIMAL : Utilisation de STR$ 
Les chiffres de I'illustration 
correspondent a I'explication 
dans le texte. 




140 
150 

160 
165 

-170 
180 
190 
300 
310 
320 
330 

-332 

-335 
340 
350 

360 
370 

■1000 
1010 

-1030 
1 100 
1 110 
1 120 
1200 
1210 
1300 
1310 
1320 
1400 

-1410 

-1420 



REM THE DECIMAL PROGRAM 
GOTO 1000 

REM * PRINT ALIGNED NUMBERS * 

REM P$ MUST CONTAIN NUMBER 

REM VTAB MUST BE PRE-DONE 

REM FIND DECIMAL POINT : 

LET DP = LEN (P$) + 1 : REM SET ALIGNMENT 

BASED ON NO DP 

FOR CHAR = 1 TO LEN <P$) 

IF MID$ (P$, CHAR, 1) = "." THEN DP = CHAR: 
REM IF DP FOUND, USE IT 
NEXT CHAR 

REM LINE UP DP AND PRINT: 
CALL ^868: REM CLEAR LINE 
HTAB 15 - DP: PRINT P$ 
RETURN 

REM * INPUT NUMBER * 

VTAB 21 : HTAB 1 

PRINT "WHAT DECIMAL NUMBER" 

PRINT "WOULD YOU LIKE TO ADD? "; 

CALL -958: REM CLEAR FROM HERE TO BOTTOM 

OF SCREEN 

INPUT ""; N$: REM "" KILLS QUESTION MARK 
N = VAL (N$) 

IF N > 999999 OR N < .01 THEN GOTO 310: 
REM POSITIVE NUMBERS ONLY 
N$ = STR$ (N) 
RETURN 

REM * MAIN ROUTINE * 
TEXT : HOME 

GOSUB 300 : REM GET NUMBER 

REM MOVE DOWN AND PRINT N$ 

ROW = ROW + 1 : VTAB ROW 

P$ = N$ : GOSUB 100 

REM ADD NEW NUMBER TO SUM: 

SUM = SUM + N 

REM PRINT TOTAL: 

P$ = STR$ (SUM) 

PRINT "TOTAL: ";: GOSUB 100 

REM REPEAT UNTIL FULL: 

IF ROW < 19 THEN 1030 

CALL -958: END 



1 . Les asteriques sont utilises dans les instructions REM pour une 
identification visuelle. Ms sont generalement utilises pour 
marquer le debut des sous-programmes et des programmes 
principaux comme aux lignes 100 et 1000. 

2. CALL provoque I'execution de sous-programmes en langage 
machine qui font des merveilles sur I'ecran : CALL-868 efface 
la ligne courante ; CALL-958 efface jusqu'au bas de I'ecran. II 
est judicieux d'utiliser ces instructions CALL en relation avec 
les instructions INPUT. Pour davantage d'informations, voir 
I'Annexe E et le Manuel de Reference Applesoft. 
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3. La chaine nulle ("") a la ligne 335 empeche I'affichage d'un 
point d'interrogation indesirable apres I'instruction INPUT. 

4 Remarquez que la sequence principale de ce programme 
commence a la ligne 1000 ; a la ligne 1030, GOSUB 300 
provoque le branchement vers I'arriere a I'instruction INPUT. 
A la ligne 370, le programme revient a la ligne 1 100. 

5. L'ecran n'affichera que 19 lignes de nombres sans defiler, 
done la variable ROW est conditionnelle a la ligne 1410. 

Les lignes 335 a 360 constituent les premieres instructions d'une 
sequence de protection contre les erreurs. Essayez d'entrez toutes 
sortes de nombres, sous toutes les formes possibles, pour voir ce 
qui arrete le programme. Imaginez ensuite differentes facons de 
corriger ces erreurs de facon a ce qu'elles n'arretent plus le 
programme. 



Encore des pieges a erreurs 

Comme vous le voyez il y a de nombreuses chausse-trappes qu'un 
programmeur doit prevoir et dont il doit se garder en ecrivant des 
programmes. II n'est jamais agreable a I'utilisateur de trouver lui- 
meme des ecueils au milieu d'un programme sans savoir comment 
s'en debarrasser, pas plus qu'au programmeur de voir cela arriver. 

Maintenant que vous savez comment VAL et STR$ peuvent etre 
utilisees si le caractere entre n'est pas un nombre positif (ligne 
335-360 dans DECIMAL), il serait interessant de voir comment 
rajouter ces fonctions dans un programme sur lequel vous avez 
deja travaille. Chargez votre plus recente version de 
COLORBOUNCE et tapez 

LIST 350-400 

Vous devriez voir ces lignes sur votre ecran : 



350 INPUT "WHAT COLOR WOULD YOU LIKE THl BAI L TO BE 

(1-15)? ". HUE 
370 REM IS HUE OF BALL IN RANGE? 
380 IF HUE > AND HUF < 16 THl N GOTO 400 
390 HOME • PRINT "THAT WASN'T BETWEEN 1 AND 

15'"- PRINT 
395 GOTO 310 

400 GR REM SET COLOR GRAPHICS AREA 
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La ligne 380 verifie que le nombre entier est dans les limites 
correctes et les lignes 390 et 395 donnent a I'utilisateur un 
message et une autre chance d'entrer un nombre a I'interieur des 
limites. Cependant, le programme ne couvre pas la possibility 
d'entrer par I'utilisateur un UN au lieu de 1. Comme vous pourrez 
voir dans « Interaction entre le programme et les utilisateurs », au 
Chapitre 4, une telle entree sera sanctionnee par le message 
d'erreur 7REENTER mais sans I'indication de ce qui est faux. 

Maintenant vous pouvez arreter le programme pour faire attention 
une telle possibility. Suivez ces etapes : 

1. Changer la variable HUE a la ligne 350 en une variable chaTm 
HUE$, de cette facon, s'il arrive a un utilisateur d'epeler un 
nombre, Applesoft sera capable d'en faire quelque chose. 
(Souvenez-vous qu'une variable numerique ne peut pas 
contenir de caracteres.) 

2. Ajoutez ces lignes au programme : 

352 REM IS ENTRY A NUMBER? 

354 HUE = VAL(HUE$) : REM VALUE OF HUE$ BECOMES 

NUMERIC VARIABLE 
356 IF HUE > 999999 OR HUE <.01 THEN GOTO 300 : REIV 

INPUT MESSAGE WILL REAPPEAR 
358 HUE$ = STR$(HUE) : REM HUE CHANGED BACK INTO 

STRING HUE$ 

Maintenant executez la nouvelle version et regardez ce que cela 
donne lorsque vous epelez un nombre en entree. Le programme 
COLORBOUNCESOUND de I'APPLESOFT SAMPLER contient ces 
modifications et toutes les autres que vous avez faites sur 

COLORBOUNCE. 



Introduction aux tableaux 

Un tableau est un type de variable qui est utilise pour representer 
des listes de valeurs liees ensemble par un quelconque arrangeme 
logique. Vous pouvez imaginer un tableau comme etant une table 
de nombres d'ou vous pouvez choisir des individus ou des 
elements (voir figure 5-3). La puissance de programmation donnet 
par les tableaux compense largement le temps passe a se 
familiariser avec eux. 

Le nom d'un tableau peut etre n'importe quel nom legal de variabl 
Un element de tableau est compose du nom de tableau suivi de 
parentheses, a I'interieur desquelles se trouvent les indices. 
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Quand I'instruction DIM est 
executee, elle reserve de la place, 
en memoire pour le nombre 
d'elements du tableau declare. 



Pour creer un tableau vous devez d'abord dire a I'ordinateur le 
nombre d'elements que vous voulez traiter avec le tableau. Pour 
cela utilisez I'instruction DIM (DIM signifie « dimension ». Les 
elements dans un tableau sont numerates a partir de zero, par 
consequent pour dimensionner un tableau appele A qui aura au 
maximum 16 elements, tapez 



DIM A(15) 

Cette instruction cree une variable tableau a une dimension avec de 
la place pour 16 elements. Les elements se comportent exactement 
comme les variables que vous avez commence a connaTtre et a 
aimer. Ce sont 



A(0) 
A(1) 
A(2) 



jusqu'a 

A(15) 

Les elements d'un tableau peuvent etre utilises exactement comme 
les autres variables utilisees. Par exemple, vous pouvez prendre 
deux elements d'un tableau A et ecrire 



A(9) = 45 + A(12) 

Dans un element de tableau, les nombres (ou expressions entre 
parentheses) sont appeles indices. Les indices peuvent etre une 
expression numerique ou etre representes par une variable. 

Le programme suivant illustre ('utilisation de variables en indices et 
affiche le contenu de chaque element du tableau tapez : 



90 REM DIMENSION ARRAY CALLED DAYS 
100 REM HOLDS 7 NUMBERS 
110 DIM DAYS(6) 
120 REM FILL THE ARRAY 
130 FOR NUM = TO 6 
140 DAYS(NUM) = NUM + 1 
150 NEXT NUM 

160 REM DISPLAY THE ARRAY ELEMENTS 
170 FOR I = TO 6 
180 PRINT "DAYS(";I;") = ";DAYS(U 
190 NEXT I 



136 



Chames de caracteres et tableaux 



Si on fait appel a un element de tableau avant que ce dernier n'ait ete 
dimensionne, I'Applesoft reserve automatiquement de la place en 
memoire pour 1 1 elements (indices a 10). Mais quoiqu'il en soit, 
c'est une bonne methode de programmation que de dimensionner tous 
les tableaux. 



Les tableaux peuvent avoir une dimension, par exemple A(15) et 
DAYS(6), ou alors plusieurs. L'instruction 

DIM TWO (3,7) 

definit un tableau a 2 dimensions. Le premier indice peut prendre 
4 valeurs (0,1,2,3) et le second en prendre 8 (0,1,2,3,4,5,6,7). Le 
tableau TWO contient de la place reservee pour un ensemble de 
32 elements differents (4 fois 8). La figure 5-3 illustre le concept 
de dimensions. 



Figure 5-3. Dimensions de tableaux. 
Le tableau DAYS(6) a une dimension 
et sept elements. Le tableau TWO 
(3,7) a deux dimensions et 
32 elements. 



Array DAY (6) 






1 


2 


3 


4 


5 


6 



0,0 


0,1 


0,2 


0,3 


0,4 


0,5 


0,6 


0,7 


1,0 


1,1 


1,2 


1,3 


1,4 


1,5 


1,6 


1,7 


2,0 


2,1 


2,2 


2,3 


2,4 


2,5 


2,6 


2,7 


3,0 


3,1 


3,2 


3,3 


3,4 


3,5 


3,6 


3,7 



Supposons que vous vouliez ecrire un programme qui brasse les 
chiffres de 1 a 8. Pour ce faire vous avez besoin d'utiliser des 
tables de donnees. Les tableaux sont precisement concus pour 
traiter aisement ce type de probleme. Le suivant illustre comment 
manipuler les « elements » de tableaux. 
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NEW 

200 REM DIMENSION THE ARRAY 

210 DIM GLASS(8) 

220 REM FILL THE ARRAY 

230 FOR I = 1 TO 8 

240 GLASS(I) = I 

250 NEXT I 

260 REM SCRAMBLE THE ARRAY AND CHOOSE EACH ELEMENT 

270 FOR WINE = 1 TO 8 

280 REM CHOOSE SOME OTHER ELEMENT 

290 MILK = INT (RNDd ) * 8) + 1 

300 REM WAS MILK DIFFERENT FROM WINE? 

310 REM IF NOT, TRY AGAIN 

320 IF MILK = WINE THEN GOTO 280 

330 REM INTERCHANGE GLASS(WINE) AND GLASS (MILK) 

340 TEMP = GLASS(WIME) : GLASS(WINE) = GLASS(MILK) : 

GLASS(MILK) = TEMP 
350 NEXT WINE 

360 REM PRINT CONTENTS OF ARRAY 
370 FOR C = 1 TO 8 
380 PRINT GLASS(C) 
390 NEXT C 

Executez le programme. Comprenez-vous comment il fonctionne ? 
Le programme impose a chaque element du tableau de changer de 
place, ainsi le programme remplit d'abord le tableau avec des 
nombres et ensuite brasse le contehu des elements du tableau. 
Remarquez que vous ne devez pas necessairement commencer a 
remplir le tableau a zero. 

Voici une description de ce que les quelques lignes les plus 
compliquees du programme font. Les lignes 230 a 250 remplissent 
le tableau et affectent a chaque element du tableau un nombre qui 
correspond au rang de I'element dans le tableau (GLASSCI) = 
1,GLASS(2) = 2, etc.). La ligne 270 affecte a la variable WINE les 
nombres de 1 a 8. La ligne 290 donne a la variable MILK la valeur 
aleatoire d'un entier de 1 a 8. Ensuite la ligne 320 permet de 
s'assurer que la valeur de la variable WINE n'est a aucun instant 
egale a celle de la variable MILK. Le contenu des variables 
GLASS(WINE) et GLASS(MILK) est interchange a la ligne 340. 
Finalement le tableau est affiche au moyen des lignes 370 a 390. 
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Messages d'erreur concernant les tableaux 



Voici quelques messages d'erreur que vous pourriez provoquer en 
programmant des tableaux. 

• PREDIM'D ARRAY 

Ce message d'erreur apparaTt lorsqu'un tableau est 
dimensionne plus d'une fois au cours d'un meme programme. 
Par exemple les lignes 

10 A(9) = 15 
20 DIM A(50) 

provoqueront ce type de message d'erreur. Souvent, 
cependant ce message apparaTt lorsqu'il manque un 
dimensionnement et plus tard une instruction de 
dimensionnement est ajoutee au programme. 

• ?BAD SUBSCRIPT ERROR 

Si on essaie d'utiliser un element d'un tableau dont I'indice est 
en dehors de la dimension, ce message apparaTt. Par exemple 
si A a ete dimensionne a 25 par I'instruction DIM A(25), la 
reference a I'element A(52) ou n'importe quel autre element 
dont I'indice est inferieur a ou superieur a 25 provoquera le 
message ?BAD SUBSCRIPT ERROR. 

• PILLEGAL QUANTITY ERROR 

Vous recevrez ce message si vous essayez d'utiliser un 
nombre negatif comme indice d'un tableau. 

Plusieurs programmes, dans I'Annexe E, utilisent les tableaux. En 
continuant maintenant par ces programmes vous aurez une 
meilleure vision des applications possibles des tableaux. 
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LEN 

LEFT$ 

MID$ 

R1GHT$ 

CLEAR 

VAL 

STR$ 

DIM 
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tableau 
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format 
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Messages d'Erreur 

^STRING TOO LONG ERROR 
?TYPE MISMATCH ERROR 
?REDIM'D ARRAY 
?BAD SUBSCRIPT ERROR 
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Conclusion 



Maintenant que vous avez ete familiarise avec quelques outils de 
programmation de I'Applesoft, vous avez plusieurs options. 

Si vous pensez que vous en avez suffisamment appris sur la 
programmation jusqu'a maintenant, vous allez probablement vouloi 
explorer les programmes d'application : ceux ecrits par d'autres 
personnes et que Ton peut acheter, et qui vous permettent 
d'utiliser I'Apple He pour toutes sortes de taches pratiques. Le 
Guide de I'Utilisateur Apple He comporte un chapitre relatif aux 
programmes d'application. 

Si vous etes pret et avide d'ameliorer vos connaissances en 
matiere de programmation, voila ci-dessous quelques suggestions. 

• Si vous parcourez ce manuel une nouvelle fois en ecrivant vos 
propres programmes avec les instructions qui vous ont ete 
presentees, vous consoliderez de beaucoup vos 
connaissances. 

• L'Annexe E : « Encore des programmes pour pratiquer » 
presente quatre nouveaux programmes, lis apportent des 
exemples de quelques-unes des applications pratiques que 
vous pouvez faire avec I'Applesoft et qui sont destinies a 
vous aider a acquerir une plus grande habilete et 
comprehension en programmation. [.'experimentation et 
I'etude des programmes de I'annexe vous aideront a acquerir 
une bonne pratique de la programmation et vous donneront 
un grand nombre d'idees pour ecrire vos propres programmes 

• Utilisez le Manuel de Reference Applesoft pour apprendre a 
utiliser les instructions Applesoft selon vos besoins. Vous 
pouvez egalement ameliorer vos talents de programmeur en 
essayant les exemples de ce manuel. 

Une des joies de posseder un ordinateur est dans le developpemen 
de vos propres idees dans des programmes que vous et d'autres 
peuvent utiliser. Ce livre a presente des possibilites du BASIC 
Applesoft. Applesoft a de nombreuses autres possibilites, que vou; 
decouvrirez quand vous aurez domine celles qui vous ont ete 
exposees ici. 
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Annexe A 



Sommaire des instructions 
et commandes 



Cette annexe est un sommaire des instructions du BASIC de 
I'Applesoft et des commandes du DOS utilisees dans ce manuel. Le 
chiffre et/ou la lettre entre crochets, a la fin de chaque description, 
fait reference au chapitre et/ou a I'annexe ou vous pouvez trouver 
de plus amples explications concernant I'instruction. 

Vous avez appris a peu pres la moitie des instructions du BASIC de 
I'Applesoft utilisables sur J'Apple He. Le Manuel de Reference du 
BASIC Applesoft represente un aide memoire et vous apporte un 
commentaire clair des instructions de I'Applesoft. 

Vous pouvez trouver dans cette annexe quelques instructions qui 
n'ont pas ete vues dans la partie principale du manuel. Elles sont 
utilisees dans I'Annexe E, « Encore des programmes pour 
pratiquer ». 

ASC 

La fonction ASC renvoie le code decimal ASCII du premier 
caractere de son argument. [E] 

CALL 

CALL provoque I'execution du sous-programme en langage machine 
a partir de I'emplacement memoire precise par I'adresse decimale 
de son argument. Par exemple, CALL-868 effacera la ligne courante 
a partir du curseur jusqu'a la marge de droite. II est p ossi ble 
d'obtenir le meme resultat en utilisant une sequence | Esc I ou I Ctrl I ■ 
[5,E] 

CATALOG 

Cette commande du systeme d'exploitation disque (DOS) affiche la 
liste de tous les enregistrements d'un disque precise. Par exemple 
CATALOG, D2 donne I'ordre au systeme d'exploitation d'afficher 
tous les enregistrements contenus dans n'importe quel disque se 
trouvant dans le second lecteur de disque. Le lecteur de disque 1 
(D1 ) est pris par defaut a moins qu'un autre lecteur soit specifie 
comme dans cet exemple. 
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Le type de fichier et le nombre de secteurs du disque occupes par 
ce fichier sont precises sur la gauche du titre du fichier dans le 
listage provoque par la commande CATALOG. La nature des fichiers 
est representee par des lettres : 

I signifie que le fichier est un programme en BASIC Entier. 

A signifie que le fichier est un programme ecrit en BASIC 
Applesoft. (Tous les programmes que vous avez sauves sur 
disque lors des applications de ce manuel sont de ce type). 

T signifie que le fichier contient du texte et qu'il a ete cree par la 
commande WRITE. 

B signifie que le fichier a ete sauve sous forme binaire, ou 
langage machine. 

[2] 

CHR$ 

Cette fonction renvoie le caractere ASCII qui correspond a la valeur 
de son argument, lequel doit etre compris entre et 255. Par 
exemple CHR$(65) renvoie la lettre A. [E] 

CLEAR 

Cette instruction de I'Applesoft annule toutes les variables, y 
compris les tableaux et les chaTnes de caracteres. Elle est utilisee 
en mode immediat. A cause du fait qu'elle annule toutes les 
variables, il est hasardeux de I'utiliser dans un programme. [5] 

COLOR = 

La couleur pour placer les points dans les graphiques basse 
resolution se determine par I'instruction COLOR = suivie par un 
entier allant de a 15 comme par exemple COLOR = 5. La couleur 
est remise a zero par I'instruction GR ; c'est pourquoi GR doit 
toujours etre suivie de I'instruction COLOR = pour que quelque 
chose apparaisse a I'ecran. Les noms des couleurs et leur numeros 
associes sont : 






noir 


4 


vert fonce 


8 


marron 


12 


vert 


1 


magenta 


5 


gris 


9 


orange 


13 


jaune 


2 


bleu fonce 


6 


bleu moyen 


10 


gris 


14 


vert eau 


3 


violet 


7 


bleu clair 


1 1 


rose 


1 5 


blanc 
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Sur un ecran noir et blanc ou vert, les 16 couleurs apparaissent 
sous quatre niveaux de gris comme suit : 



Gris fonce : 1, 2, 4, 8 
Gris moyen : 5, 10 
Gris clair : 3, 6, 9, 12 
Gris pale : 7, 11, 13, 14 
Blanc : 15 

[1] 

CONT 

Cette instruction provoque la reprise de ('execution du programme 
ou la continuation apres qu'un rCTrTl - C, un STOP ou un END aient 
ete utilises pour arreter I'execution. La reprise se fait a I'instructior 
suivante (comme pour GOSUB) et non au numero de ligne suivant. 
Les variables ne sont pas remises a zero. 

Si vous modifiez, ajoutez ou effacez une ligne programme, si vous 
obtenez un message d'erreur apres I'arret de I'execution, CONT n'< 
plus d'effet. 

Si le programme n'a pas ete arrete, CONT n'a pas d'effet. [2] 
DATA 

L'instruction DATA permet la creation d'une liste d'elements qui 
peuvent etre utilises par l'instruction READ. Ces elements peuvent 
etre des constantes, des chaTnes de caracteres, des reels, des 
entiers, ou une combinaison de I'ensemble comme le montre 
I'exemple suivant 

DATA SMITH, "TRUMAN", 3.17, -6 

[E] 

DEL 

Cette instruction supprime ou efface dans les limites specifiees du 
programme, comme par exemple DEL 23,56. Toute autre syntaxe 
entramerait le message d'erreur ^SYNTAX ERROR Pour effacer une 
seule ligne, par exemple la ligne 35, utilisez soit la forme DEL 
35,35, soit tapez le numero de la ligne et faites un retour chariot. 
[3] 
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DELETE 

Cette commande du systeme d'exploitation disque supprime le 
programme du disque dont le nom a ete specifie. Comme d'autres 
commandes de systeme d'exploitation, elle peut etre suivie d'un 
numero de lecteur de disque si, par exemple, le disque contenant le 
programme n'est pas sur le drive pris par defaut. DELETE BOUNCE, 
D2 supprimera le programme BOUNCE du disque du second 
lecteur, a moins que ce disque ne soit protege en ecriture ou alors 
que le fichier soit verrouille. [3] 

Note : La touche fTjell sur le clavier n'est pas la meme que la commande 
DELETE. Voyez le Manuel de I'Utilisateur Apple lie et le Manuel de 
Reference de I' Apple lie, pour plus amples informations. 

DIM 

Quand ('instruction DIM est executee, elle reserve de 
I'emplacement memoire pour un tableau contenant le nombre 
specifie d'elements. Les elements dans un tableau, appeles indices, 
sont numerates a partir de zero. DIM A (50) dimensionnera ou ^ 
reservera de la place memoire, pour un tableau contenant jusqu'a 51 
elements. DIM N$(25) reservera de la place pour 26 chaTnes de 
caracteres, de n'importe quelle longueur, du tableau N$. 

Si un element de tableau est utilise dans un programme avant que 
celui-ci n'ait ete dimensionne, I'Applesoft reservera 
automatiquement de la place pour 1 1 elements (indice a 10). 
Lorsqu'un RUN, ou un CLEAR, est effectue tous les elements de 
tableau sont mis a zero. [5] 

END 

L'instruction END arrete le programme en cours et rend la main a 
I'utilisateur. Aucun message n'apparaTt. [4] 

FOR 

Une instruction FOR, utilisee de pair avec une instruction NEXT, 
met en ceuvre une boucle de programme. La boucle est effectuee le 
nombre de fois specifie apres le TO de l'instruction. L'utilisation de 
STEP est optionnelle. 

Dans l'instruction FOR W = 1 TO 20... NEXT W, la variable W 
compte le nombre de fois que Ton doit effectuer les instructions. 
Les instructions a I'interieur de la boucle seront executees 20 fois, 
de W egal 1, 2, 3 jusqu'a 20. La boucle finit d'etre executee avec 
W = 21 et l'instruction suivant le NEXT W est ensuite executee. 
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L'instruction FOR Q = 2 TO -3 STEP -2... NEXT Q illustre 
comment utiliser STEP pour incrementer par autre chose que par 1 . 

Le controle se fait en fin de boucle ; ainsi dans I'exemple FOR Z = 
5 TO 4 STEP 3... NEXT Z, les instructions internes a la boucle sont 
executees une fois. 

Le message ?NEXT WITHOUT FOR ERROR apparait si vous essayez 
d'executer un programme avec des boucles croisees. [2] 

GOSUB 

GOSUB provoque le branchement du progamme a la ligne dont le 
numero a ete precise. Le sous-programme commencant a ce 
numero de ligne devra s'arreter par une instruction RETURN, 
laquelle forcera le retour de I'execution du programme a 
l'instruction suivant immediatement le GOSUB. Par exemple GOSUB 
500 provoquera le branchement a l'instruction 500 et continuera 
jusqu'a la rencontre de RETURN. [4] 

GOTO 

L'instruction GOTO permet au programme de se brancher a la ligne 
precisee. Elle est utilisee pour la creation de boucles et pour lancer 
un programme en evitant de reinitialiser les variables. [2] 

GR 

Cette instruction permet la mise en place du graphique basse 
resolution. Dans ce mode, I'ecran possede une grille invisible de 40 
colonnes et 40 lignes numerotees de a 39 et 4 lignes d'espace 
supplementaire en bas pour y mettre des commentaires. GR efface 
I'ecran et etablit COLOR = a zero, c'est-a-dire ecran noir. [1] 

HCOLOR= 

Le choix des couleurs pour le graphique haute resolution est 
effectue par l'instruction HCOLOR = . Les noms des couleurs et 
leurs numeros associes sont : 



noirl 

1 vert 

2 violet 

3 bland 



4 noir2 

5 orange 

6 bleu 

7 blanc2 



[4] 
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HGR 

Le mode graphique haute resolution, etabli par HGR, cree une grille 
d'ecran de 280 x 160 points et laisse 4 lignes en base pour des 
messages eventuels. L'ecran est efface en noir et la premiere page 
de la memoire est affichee. Ni HC0L0R= ni la memoire ecran du 
texte ne sont affectes lorsque HGR est execute. Le curseur peut ne 
pas etre visible jusqu'a ce qu'il soit deplace sur les 4 lignes 
inferieures de l'ecran (fenetre de texte) en appuyant sur 0. [4] 

HLIN 

L'instruction HLIN est utilisee pour tracer des lignes horizontales en 
graphique basse resolution. Elle utilise la couleur la plus recemment 
specifiee. La syntaxe de HLIN est 

HLIN 10, 30 AT 20 

Cet exemple trace une ligne horizontale de la colonne 10 jusqu'a la 
colonne 30 a la ligne 20. [1] 

HOME 

L'utilisateur de HOME, lorsque vous etes en mode texte, va effacer 
tout le texte et placer le curseur au coin superieur gauche de 
l'ecran. L'utilisation de HOME dans un des deux modes graphiques 
n'efface que les 4 lignes utilisables pour le texte, sur le bas de 
l'ecran. (Pour effacer les dessins sur l'ecran utiliser GR ou HGR). [1] 

HPLOT 

L'instruction HPLOT sert a positionner des points et des lignes en 
mode graphique haute resolution, en utilisant la derniere valeur 
specifiee pour HC0L0R = . II y a 3 syntaxes differentes ; chacune a 
un effet different : 

HPLOT 10, 20 

Positionne un point a haute resolution a la 10 e colonne et a la 
20 e ligne de la grille (invisible) d'ecran. 

HPLOT TO 70, 80 

Trace une ligne depuis le dernier point trace jusqu'a la colonne 70, 
ligne 80, en utilisant la couleur du dernier point affiche (pas 
necessairement la derniere couleur specifiee par HC0L0R = ). Si 
aucun point n'a ete positionne anterieurement aucune ligne n'est 
tracee. 
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HPLOT 30, 40 TO 50, 60 



Positionne une ligne en haute resolution du point colonne 30, ligne 
40, au point colonne 50, ligne 60. 

La ligne positionnee peut etre etendue dans la meme instruction 
presque indefiniment. L'unique instruction 

HPLOT 0,0 TO 279,0 TO 279,159 TO 0,159 TO 0,0 

dessine un lisere rectangulaire autour des 4 cotes de I'ecran a 
haute resolution. (Si ca ne marche pas, votre ecran a besoin d'etre 
regie). 

HPLOT doit etre precede par HGR pour eviter d'effacer la memoire 
de I'Apple lie y compris votre programme et vos variables. [4] 

HTAB 

L'instruction HTAB deplace le curseur vers la gauche ou vers la 
droite de la colonne specifiee (1 a 40) sur I'ecran. Les 
deplacements de HTAB sont tous relatifs a la marge gauche de la 
fenetre de texte, mais independants de la longueur de la ligne. Une 
ligne a 255 caracteres (c'est le nombre de caracteres limite de 
chaque ligne). Comme I'ecran est limite a 40 caracteres par ligne, 
HTAB fait progresser le curseur a la ligne suivante pour les 
emplacements 41 a 80, la ligne suivante vers le bas pour les 
positions 81 a 120, ainsi de suite. [2] 

IF 

L'ordre IF... THEN cree une boucle conditionnelle de programme. II 
est tres utilise pour limiter I'etendue d'une variable de programme. 
Quand la condition suivant le IF est evaluee comme fausse (0), toul 
le reste de cette ligne de programme est ignore et I'ordinateur va a 
la ligne suivante. Quand la condition est vraie (1), l'instruction 
suivant le mot THEN est executee. 

IF N < = 5 THEN GOTO 100 

Dans cet exemple la variable N sera comparee a la condition IF 
N< =5 et evaluee. Chaque fois que la condition est vraie (quand N 
est egale a 1, 2, 3,4 par exemple), le reste de l'instruction sera 
execute et le programme se branchera a la ligne 100 (specifie par 
GOTO). Si la condition est fausse quand N = 6 ou 10, par 
exemple), le GOTO est ignore. 
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Les expressions sont evaluees selon leur rang alphabetique. 



Un THEN sans le IF correspondant, ou un IF sans le THEN 
correspondant, causera un ?SYNTAX ERROR. [2] 



INPUT 



L'ordre INPUT vous permet une interaction avec un utilisateur de 
programme a partir de I'interieur du programme. Une instruction 
INPUT doit nommer la variable qui doit etre entree par I'utilisateur 
et doit contenir une question ou une instruction. Dans I'exemple 



un point d'interrogation s'affiche sur I'ecran quand I'instruction est 
executee et le programme attend que I'utilisateur entre un nombre 
qui sera affecte a la variable numerique A. Dans I'exemple 

INPUT "TYPE AGE THEN A COMMA THEN YOUR NAME"; B, C$ 

la chaTne de caracteres s'affiche exactement comme ci-dessus (si 
le programmeur veut inclure un point d'interrogation, il faudrait 
I'inclure a I'interieur des guillemets). Le programme attend que 
I'utilisateur tape un nombre qui est affecte a la variable B, puis une 
virgule, puis un nom qui est affecte a la variable chaTne C$. Des 
entrees multiples doivent etre separees par des virgules ou des 
pressions de la cle RETURN. INPUT ne peut pas etre utilise en 
execution immediate. [2] 



La fonction INT renvoie un entier inferieur ou egal a I'argument 
donne. Dans I'exemple INT(NUM), si NUM est 2,389, 2 sera 
renvoye ; si NUM est -45,12345, -46 sera renvoye. [4] 



L'instruction INVERSE positionne le mode video de facon a afficher 
des lettres noires sur fond blanc. Utilisez NORMAL pour retourner 
en lettres blanches sur fond noir. [1] 
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INPUT A 



INT 



INVERSE 




LEFT$ 



La fonction de chaTne LEFT$ renvoie le nombre specifie de 
caracteres les plus a gauche de la chaTne. Si vous tapez PRINT 
LEFT$ ("APPLESOFT", 5), les cinq caracteres les plus a gauche, 
APPLE, seront renvoyes. [5] 

LEN 



La fonction de chaTne LEN renvoie le nombre de caracteres dans 
une chaTne (specifiee entre parentheses) entre et 255. Dans 
I'exemple LEN ("AN APPLE A DAY"), 14 sera renvoye. Dans 
I'exemple LEN(A$), le nombre renvoye sera le compte des 
caracteres dans la chaTne A$. [5] 

LET 



L'instruction LET est utilisee pour definir une variable. On assigne 
au nom de variable a gauche du signe egal, qui est utilise en 
relation avec LET, la valeur de la chaTne ou de I'expression a droite 
du signe egal. LET est optionnel, les instructions LET A = 23 et A 
= 23 donnent le mime resultat. [1] 

LIST 

L'instruction LIST affiche les lignes de programme qui sont dans la 
memoire de I'Apple He. 

LIST Affiche tout le programme. 

LIST 150 Affiche uniquement la ligne 150. 

LIST -200 Affiche depuis le debut du programme 

jusqu'a la ligne 200. 

LIST 200- Affiche depuis la ligne 200 jusqu'a la fin du 

programme 



LIST 200,3000 Liste des lignes du programme de 200 a 

ou LIST 200-3000 3000 

[Ctrl I - S est utillise po ur a rreter et pour reprendre un listage. Un 
listage est arrete par | Ctrl I - C, et la commande CONT ne peut pas 
etre utilisee. [2] 
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LOAD 

La commande LOAD, lorsqu'elle est suivie par un nom de fichier, a 
pour but de trouver le fichier programme, nomme sur le disque, 

,4 faut. Si le pro 

Load 



loge dans le lecteur assigne ou pris par defaut. Si le programme est 



trouve, il est transfere dans la memoire de I'ordinateur 
efface tout programme dans I'ordinateur avant de placer le 
nouveau programme en memoire. 

LOAD est une instruction utilisee egalement avec les enregistreurs 
de cassettes. Quand il n'est pas suivi par un nom de fichier, LOAD 
lit un programme Applesoft a partir d'une cassette magnetique 
dans la memoire de I'ordinateur. Aucun caractere d'avis n'esf 
donne : I'utilisateur doit rembobiner la bande magnetique et 
appuyer sur le bouton "play" sur le magnetophone pour charger. 
On entend un bip quand I'information est trouvee sur la bande que 
I'on charge. Quand le chargement a ete reussi, un second bip est 
emis et le caractere Applesoft d'avis (]) est affiche. Le fait de 
simplement appuyer sur la touche [Reset] peut interrompre la 
commande. Regardez le Manuel de Reference Applesoft pour une 
liste de toutes les instructions utilisees avec les magnetophones a 
cassettes. [2] 

MID$ 

La fonction de chame MID$ renvoie une sous-chaine specifiee entre 
parentheses. Si vous tapez PRINT MID$("AN APPLE A DAY",4) les 
caracteres depuis le quatrieme jusqu'au dernier de la chame seront 
renvoyes : APPLE A DAY. Dans I'exemple MID$("AN APPLE A 
DAY", 4, 9), les neuf caracteres a partir du quatrieme caractere de la 
chame seront renvoyes : APPLE A D. [5] 

NEW 

L'instruction NEW efface le programme courant de la memoire et 
positionne toutes les variables a zero. [2] 

NEXT 

NEXT est utilise a I'interieur d'une boucle FOR/NEXT. Voyez 
l'instruction FOR pour explication. [2] 

NORMAL 

NORMAL positionne le mode video dans les habituelles lettres 
blanches sur fond noir. [1] 

NOTRACE 

L'instruction NOTRACE annule l'instruction TRACE. Voir TRACE. [4] 
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ONERR GOTO 



ONERR GOTO est utilise pour s'affranchir d'un message d'erreur qui 
stoppe I'execution quand une erreur apparait. A I'execution, ONERR 
GOTO positionne un drapeau qui provoque un saut inconditionnel 
au numero de ligne indique si une erreur est rencontree dans la 
suite du programme. [E] 

PEEK 

La fonction PEEK renvoie le contenu, sous forme decimale, de 
I'octet memoire dont I'adresse est specifiee. Dans I'exemple PEEK 
(-16336), I'adresse, ou argument, est - 16336. Cette adresse 
particuliere correspond a I'adresse memoire du haut parleur de 
I'Apple lie. Quand la fonction est executee, le haut parleur produit 
simplement un die audible. [4,E] 

PLOT 

En mode graphique basse resolution, I'instruction PLOT, positionne 
un pave a I'endroit indique. Dans I'exemple PLOT 10, 20, un pave 
sera place a la colonne 10, ligne 20. La couleur du pave est 
determined par la plus recente valeur de COLOR = , la couleur noire 
est prise par defaut. [1] 

POKE 

POKE stocke I'equivalent binaire du second argument (3 dans 
I'exemple qui suit) dans I'emplacement memoire dont I'adresse 
decimale est donnee par le premier argument (34 dans I'exemple). 
Les instructions POKE sont tres utiles pour realiser certaines 
choses, comme commuter la fenetre texte/graphique et pour 
controler la taille et le defilement de la fenetre de texte. Dans 
I'exemple POKE 34,3, la marge haute de I'affichage est positionnee 
3 lignes plus bas que le haut et le texte est decale jusqu'a cette 
marge. Un autre exemple est POKE 33,33 qui retrecit la largeur de 
la fenetre de texte. [E] 

PRINT 

C'est la premiere des instructions Applesoft utilisees pour afficher 
des informations sur I'ecran. L'instruction PRINT peut afficher un 
nombre, comme dans PRINT 150 ; elle peut aussi afficher le 
contenu d'une variable, comme dans PRINT N ; elle peut afficher 
un groupe de caracteres contenu entre guillemets comme dans 
PRINT "HELLO THERE" et afficher une ligne vide, comme dans 
PRINT, ce qui provoque un saut de ligne et un retour chariot. 

Pour afficher une liste de termes sans separation entre eux, utilisez 
des points virgules dans I'instruction PRINT. Pour afficher une liste 
de termes dans des champs separes, utilisez des virgules. [1] 
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PR# 



PR# est une commande du systeme d'exploitation disque (DOS) 
qui envoie des informations sur un point d'entree sortie specifie, 1 
a 7. Pour envoyer des informations au point 1, ou une imprimante 
est habituellement connectee, vous tapez PR # 1 . PR#0 renvoie sui 
I'ecran d'affichage, bien que ce ne soit pas la meilleure methode a 
utiliser avec certaines cartes peripheriques. [E] 

READ 

Quand un programme execute une instruction READ, il cherche une 
instruction DATA. II utilise le premier element de I'instruction DATA 
comme une variable dans I'instruction READ. Les elements 
successifs de DATA sont successivement assignes aux variables du 
READ, chaque fois que READ est execute. Dans I'exemple READ A, 
B, C$, les deux premiers elements de I'instruction DATA doivent 
etre des nombres et le troisieme element doit etre une chame de 
caracteres. Les elements seront done successivement affectes, 
respectivement, aux variables A, B, et C$. [E] 

REM 

REM est une instruction qui vous permet de mettre une remarque, 
ou un commentaire, dans un programme. Les instructions REM ne 
sont pas affichees a I'ecran ou executees par un programme. Elles 
sont utilisees par les programmeurs pour commenter les lignes de 
programmes. [2] 

RETURN 

L'instruction RETURN est utilisee a la fin des sous-programmes. Elle 
provoque le branchement du programme a I'instruction qui suit 
immediatement le dernier GOSUB rencontre. [4] 

RIGHT$ 

La fonction de chame de caracteres RIGHT$ renvoie le nombre 
specifie de caracteres les plus a droite dans la chame. Si vous 
tapez PRINT RIGHT$ ("SCRAPPLE", 5), APPLE (les 5 caracteres les 
plus a droite) sera renvoye. [5] 

RND 

La fonction arithmetique RND renvoie un nombre reel aleatoire plus 
grand ou egal a zero et plus petit que 1 . Chaque fois que RND est 
utilise avec un argument positif quelconque, un nouveau nombre 
compris entre et 1 est genere, a moins qu'il ne fasse partie d'une 
suite de nombres aleatoires generes par un argument negatif. 
RND(O) renvoie le dernier nombre aleatoire genere. [4,E] 
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RUN 



L'instruction RUN met a zero toutes les variables et commence 
I'execution du numero de ligne indique. 

RUN Execute le programme en entier, en 

commencant par le plus petit numero de 
ligne. 

RUN 130 Commence I'execution a la ligne 130 (ou a 

n'importe quelle ligne specifiee) et continue 
jusqu'a la fin du programme. 

RUN suivi d'un nom de fichier est une commande du systeme 
d'exploitation disque (DOS). Elle charge le fichier nomme a partir 
du lecteur de disque specifies ou pris par defaut et ensuite execute 
le programme qui a ete charge. [21 

SAVE 

SAVE, suivi par un nom de fichier est une commande du systeme 
d'exploitation disque (DOS) qui sauve sur disque le programme 
courant en memoire. Si on donne I'ordre SAVE AGE, et qu'aucun 
fichier appele AGE n'est trouve sur le disque dans le lecteur specifie 
ou pris par defaut, un fichier est cree sur ce disque et le 
programme courant en memoire est sauve sous ce nom de fichier. 
Si le disque contient deja un fichier dans le meme langage de 
programmation avec le nom demande, les enregistrements 
originaux sont perdus dans le fichier et le programme courant est 
sauve a leur place. Aucun avertissement n'est donne. 

SAVE, utilise sans nom de fichier, stocke le programme courant en 
memoire sur une cassette magnetique. Aucun signal 
d'avertissement n'est donne, I'utilisateur doit enfoncer 
simultanement les touches d'enregistrement et de lecture sur le 
magnetophone avant que I'ordre SAVE soit execute. L'ordre SAVE 
ne verifie pas si les bonnes touches sont enfoncees ; un bip sonore 
signale le debut et la fin d'un enregistrement. Voyez le Manuel de 
Reference de /'Applesoft pour avoir la liste de toutes les 
instructions pour magnetophones a cassettes. [2] 

STR$ 

La fonction STR$ renvoie une chaTne de caracteres qui represente 
la valeur de I'argument. Dans I'exemple STR$(12.45), 12.45 est 
renvoye. [5] 

TAB 

La fonction d'affichage TAB, qui doit etre utilisee dans une 
instruction PRINT, deplace le curseur sur des tabulateurs sur 
I'ecran. Ses arguments doivent etre compris entre et 255 et 
entre parentheses. 
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Si I'argument est plus grand que la valeur courante de la position 
du curseur, TAB deplace le curseur a la position specifiee pour 
imprimer, en comptant a partir du bord gauche du debut de ligne 
oil le curseur est positionne. Si I'argument est plus petit que la 
valeur courante du curseur, ce dernier ne bouge pas. [2] 

TEXT 

L'instruction TEXT positionne I'ecran dans le mode non graphique 
habituel pour le texte, avec 40 caracteres par lignes et 24 lignes. 
Quand elle est utilisee pour quitter le mode graphique, il est 
preferable de I'utiliser avec l'instruction' HOME. Ce qui a pour effet 
de positionner la fenetre texte sur tout I'ecran. [1] 

TRACE 

L'instruction de mise au point TRACE provoque I'affichage a I'ecran 
du numero de chaque ligne pendant son execution. TRACE n'est 
pas desactive par RUN, CLEAR, NEW, DEL ou iResetl , seul 
NOTRACE le desactive. [4] 

VAL 

La fonction VAL tente d'interpreter une chaine de caracteres, 
jusqu'au premier caractere non numerique, comme un nombre reel 
ou entier et renvoie la valeur de ce nombre. S'il n'y a aucun 
nombre avant le premier caractere non numerique, elle renvoie 
zero. [5] 

VLIN 

En mode graphique basse resolution, VLIN dessine une ligne 
verticale dont la couleur est celle definie par la plus recente 
instruction COLOR = . La ligne est dessinee dans la colonne 
specifiee par le troisieme argument. Dans I'exemple VLIN 10, 20 AT 
30, la ligne est dessinee de la ligne 10 a la ligne 20 sur la colonne 
30. [1] 

VTAB 

VTAB deplace le curseur vers la ligne specifiee, verticalement, sur 
I'ecran. La ligne du haut est le numero 1 et celle du bas est le 
numero 24. VTAB deplace le curseur verticalement vers le haut ou 
vers le bas, mais pas vers la gauche ou la droite. [2] 
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La liste qui suit contient tous les mots reserves en Applesoft 
BASIC, lis sont reserves pour etre utilises comme des dans les 
instructions en Applesoft. Quand Applesoft les trouve dans un 
programme, il essaie de I'executer et ne comprend que leur sens 
dans le langage. Dans la plupart des cas ces mots reserves ne 
peuvent pas etre utilises comme noms de variables. Les 
commentaires a la fin de la liste notent les exceptions. Voyez le 
Manuel de Reference du Programme en BASIC Applesoft pour une 
explication des instructions non abordees dans ce manuel. 
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Mots reserves par I'Applesoft 



& 

ABS 

AND 

ASC 

AT 

ATN 

CALL 

CHR$ 

CLEAR 

COLOR: 

CONT 

COS 

DATA 

DEF 

DEL 

DIM 

DRAW 

END 
EXP 

FLASH 
FN 
FOR 
FRE 



GET 
GOSUB 
GOTO 
GR 

HCOLOR= 

HGR 

HGR2 

HIMEM: 

HLIN 

HOME 

HPLOT 

HTAB 

IF 

IN£ 

INPUT 

INT 

INVERSE 

LEFT$ 

LEN 

LET 

LIST 

LOAD 

LOG 

LOMEM: 
M!D$ 



NEW 
NEXT 
NORMAL 
NOT 

NOTRACE 
ON 

ONERR 
OR 

PDL 

PEEK 

PLOT 

POKE 

POP 

POS 

PRINT 

PRE 

READ 

RECALL 

REM 

RESTORE 

RESUME 

RETURN 

RIGHT$ 

RND 

ROT = 

RUN 



SAVE 
SCALE = 
SCRN( 
SGN 

SHLOAD 

SIN 

SPC( 

SPEED = 

SQR 

STEP 

STOP 

STORE 

STR$ 

TAB( 

TAN 

TEXT 

THEN 

TO 

TRACE 

USR 

VAL 
VLIN 
VTAB 

WAIT 

XPLOT 
XDRAW 
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L' Applesoft "transforme" en jetons ces mots reserves : chaque 
mot n'occupe qu'un octet d'espace memoire. Habituellement un 
caractere seul occupe un octet. 

• Le "et commercial" (&) est destine a I'usage interne du micro 
ordinateur ; ce n'est pas une instruction propre a I'Applesoft. 
Ce symbole, lorsqu'il est execute comme une instruction, 
provoque un saut inconditionnel a I'adresse $3F5. 

• XPLOT est un mot reserve qui ne correspond pas a une 
instruction courante en Applesoft. 

Certains mots reserves sont reconnus par I'Applesoft seulement 
dans certains contextes : 

• COLOR = , HCOLOR = , SCALE = , SPEED = et ROT= sont 
interpreters comme des mots reserves seulement si le 
caractere qui suit est le signe egal ( = ). Dans le cas de 
COLOR = et de HCOLOR = , c'est de peu d'interet car le mot 
reserve OR empeche de toute facon leur utilisation comme 
noms de variables. 

Quand vous essayez d'executer une instruction comme 10 
C0L0RFUL=5 vous obtenez PSYNTAX ERROR. Si vous 
essayez de lister la meme instruction, elle est decoupee en 



10 COL OR FUL = 5 



SCRN, SPC, et TAB sont reconnus comme des mots reserves 
seulement si le caractere non blanc qui suit est une parenthese 
ouvrante <(>. 

HIMEM doit etre suivi de deux points (:) pour etre reconnu 
comme un mot reserve. 

LOMEM necessite aussi deux points (:).pour etre reconnu. 

ATN est reconnu comme un mot reserve seulement s'il n'y a 
pas d'espace entre le T et le N, le mot reserve AT est reconnu 
a la place de ATN. 

TO est interprets comme un mot reserve a moins qu'il ne soit 
precede par un A avec un blanc entre le T et le 0. Si un blanc 
est entre le T et le 0, le mot reserve AT est reconnu a la place 
deTO. 



Mots reserves en Applesoft 



U 
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Quelquefois les parentheses peuvent etre utilisees pour entourer les 
mots reserves : 

100 FOR A = LOFT OR CAT TO 1 5 se liste ainsi 

100 FOR A • LOh IO RC AT TO 15 
Alors que, 100 FOR A = (LOFT)OR(CAT) TO 15 se liste 

100 FOR A = (LOFT) OR (C AT) TO 15 
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Messages d'erreur 



Cette annexe presente tous les messages d'erreur du BASIC de 
I'Applesoft. Le Manuel de Reference BASIC d' Applesoft contient 
davantage d'informations relatives a la recuperation des erreurs et 
a la mise au point de programmes. 

Quand une erreur apparaft, le BASIC retourne en mode commande 
indique par le caractere d'attente ]. Les valeurs des variables dans 
le programme restent intactes mais le programme ne peut continuer 
meme par la commande CONT. Tous les compteurs de boucles 
FOR et d'appels de GOSUB sont remis a zero. 

Le format des messages d'erreur est le suivant : 

• Errors in immediate execution statements display as 
?XX ERROR. 

• Errors in deferred execution statements display as 
?XX ERROR IN YY. 

Dans les deux formats XX est le nom de I'erreur specifique. En 
mode programme YY est le numero de ligne de I'instruction ou 
I'erreur est apparue. Dans ce mode les erreurs ne sont pas 
detectees tant que I'instruction n'est pas executee. 

Tous les messages d'erreur sont precedes par un point 
d'interrogation (?). Si un message d'erreur est affiche sur votre 
ecran sans point d'interrogation il s'agit d'un message ne 
correspondant pas a une erreur (tel que BREAK IN 110) ou un 
message du DOS ; voir le Manuel DOS pour des informations 
complementaires. Un message d'erreur est precede par trois 
asteriques (***) comme dans ***SYNTAX ERR, qui est un 
message d'erreur du BASIC entier. 
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Messages d'erreurs et leurs explications. 

7BAD SUBSCRIPT ERROR 

Une tentative de reference a un element de tableau en dehors de la 
plage des variations des indices a ete faite. Cette erreur peut 
apparaftre si un mauvais nombre de dimensions a ete utilise dans 
une reference ou si un indice est superieur a la taille limite ; par 
exemple, LET A(1 1) = Z quand A a ete dimensionne par DIM A(2). 

?CAN'T CONTINUE ERROR 

Tentative de poursuivre I'execution d'un programme : 

• le programme n'existe pas 

• une errreur est apparue 

• une ligne a ete changee, supprimee, ou ajoutee au 
programme. 

7DIVISION BY ZERO ERROR 

Une division par zero produit ce message. 

7FORMULA TOO COMPLEX ERROR 

Plus de deux instructions IF... THEN ont ete executees. 

7ILLEGAL DIRECT ERROR 

Vous ne pouvez pas utiliser les instructions INPUT, DEF FN, GET, 
ou DATA en mode immediat. 

7ILLEGAL QUANTITY ERROR 

Le parametre passe a une fonction standard de type numerique ou 
chaine, est en dehors des limites : 

un indice de tableau negatif (exemple LET A( - 1) = 0) 

utilisation de LOG avec un parametre negatif ou nul 

utilisation de SQR avec parametre negatif 

A " B avec A negatif et B en entier 

utilisation de MID$, LEFT$, FtlGHT$, WAIT, PEEK, POKE, 
TAB, SPC, ON. ..GOTO, ou d'une fonction graphique avec un 
parametre incorrect. 



164 



Annexe C 



7NEXT WITHOUT FOR ERROR 



L'instruction NEXT rencontree contient une variable ne 
correspondant pas a celle de la derniere instruction FOR executee, 
ou une instruction NEXT rencontree sans aucune instruction FOR 
prealablement executee. Les trois causes les plus frequentes 
d'apparition de cette erreur sont : d'oublier de frapper l'instruction 
FOR ou NEXT appropriee, de taper un mauvais nom de variable 
apres l'instruction NEXT, ou de provoquer un branchement a 
I'interieur de la portee d'une boucle FOR. 



70UT OF DATA ERROR 

Une instruction READ a ete executee mais toutes les instructions 
DATA du programme ont deja ete lues. Le programme essaie de lire 
plus de donnees que le programme n'en contient. 



70UT OF MEMORY ERROR 

Les erreurs suivantes peuvent produire ce message 



programme trop grand 
trop de variables 

plus de 10 niveaux de boucles FOR emboTtes 

plus de 24 appels consecutifs d'instructions GOSUB 

expressions trop complexes 

plus de 36 niveaux de parentheses 

tentative de donner a LOMEM une valeur trop elevee ou une 

valeur inferieure a la valeur actuelle 

tentative de donner a HIMEM une valeur trop basse. 



70VERFL0W ERROR 

Le resultat d'un calcul est trop grand pour §tre represents dans le 
format de I'Applesoft. Si un sous-passement apparaTt, la valeur 
prise comme resultat est zero et I'execution se poursuit sans qu'un 
message d'erreur ne soit imprime. 



—J 



7REDIMV ARRAY ERROR 

Apres qu'un tableau ait ete dimensionne, une autre instruction de 
dimension portant sur le meme tableau a ete rencontree. Cette 
erreur apparaTt souvent si le tableau a utilise le dimensionnement 
implicite et si ensuite ce tableau figure dans une instruction DIM du 
programme. Ce message d'erreur est utile si vous souhaitez savoir 
le numero de la ligne ou le tableau a ete dimensionne. Vous inserez 
une instruction dimension pour ce tableau a la premiere ligne et 
executez le programme et Applesoft vous signalera alors 
l'instruction contenant le dimensionnement original. 
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7RETURN WITHOUT GOSUB ERROR 

Une instruction RETURN a ete rencontree sans correspondance 
avec une instruction GOSUB. 



7STRING TOO LONG ERROR 

Par I'intermediaire de I'operateur de concatenation ( + ), votre 
programme a tente de creer une chaTne de longueur superieure a 
255 caracteres. Cette erreur tend a apparaTtre quand une variable 
chaTne est utilisee plusieurs fois sans avoir ete reinitialisee. 



? SYNTAX ERROR 

Parentheses oubliees dans une expression, caractere illegal dans 
une ligne, ponctuation incorrecte, ou autre erreur de format. Cette 
erreur est souvent causee par une simple erreur de frappe. 



7TYPE MISMATCH ERROR 

La partie gauche d'une instruction d'affectation est de type 
numerique alors que la partie droite est de type chaTne, ou une 
fonction attendait un parametre de type chaTne alors que vous lui 
avez donne un argument numerique ou vice et versa. Ceci apparaTt 
souvent parce que le caractere ($)a ete oublie. 



7UNDEFV STATEMENT ERROR 

Tentative d'executer une instruction GOTO, GOSUB ou THEN 
devant se brancher a un numero de ligne inexistant, Ceci peut se 
produire par destruction accidentelle d'une ligne, changement d'un 
numero de ligne sans en reporter les consequences sur les 
references a cette ligne ou simple erreur de frappe. 



: 



7UNDEFV FUNCTION ERROR 

Une reference a ete faite a une fonction utilisateur qui n'a pas ete 
definie. 
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Aide 



Cette annexe vous donne quelques idees relatives a I'attitude a 
tenir lorsque tout ne se passe pas comme prevu, et ou chercher 
I'information necessaire. 



Si votre programme (ou vous-meme) etes 
"plante" ! 

Un jour, pendant que vous travaillerez avec plaisir, vous 
decouvrirez que plus rien ne se produit sur I'ecrant. Si vous 
appuyez sur la touched , rien ne se produit a I'ecran. II en est de 
meme si vous essayez une autre touche. Le curseur peut meme 
avoir disparu. 

Certains professionnels disent dans le jargon informatique que le 
systeme est plante ! 

II y a au moins 6 methodes de revenir en mode normal, methodes 
qui sont presentees par ordre de "severite" croissante. II est 
toujours preferable d'essayer d'abord les methodes 1 ou 2. 

1. Appuyez sur la touche [Esc] situee au coin superieur gauche du 
clavier. Son nom complet est escape, (ou encore 
echappement !) Si vous avez de la chance, cela suffira pour 
refaire demarrer votre Apple lie. 

2. Appuyez sur I Ctrl I - C. Beaucoup de programmes interpretent 
cette touche comme une demande d'annulation. 

3. Appuyez sur lCtrli - C puis sur0. 

4. Maint enez la touche [CtrTI enfoncee et appuyez sur la touche 
iResetl (loin sur le cote avant droit du clavier). | Ctrl i - iResetl 
provoque le demarrage du programme resident. 

5. Appuyez sur la touche [5] et maint enez la enfon cee pendant 
que vous appuyez sur les touches [CtrTI et IResetl ■ Ce procede est 
assez drastique en ce sens qu'il interrompt le programme en 
cours, efface la memoire. Vous trouverez des details relatifs a 
cette procedure dans le Manuel de Reference Apple He. 



Si votre programme (ou vous meme) etes plante 



6. Coupez I'alimentation electrique. Vous serez rarement oblige 
d'aller si loin, et il est plus facile d'utiliser la methode 5 que de 
couper et de remettre I'alimentation. 

Vous pouvez utiliser les memes methodes pour sortir d'un 
programme. 

Habituellement un programme (s'il est bien ecrit) vous dit ce qu il 
faut faire, mais il y a des cas ou vous ne disposez pas de cette 
facilite. 



Erreurs — 

Dans ce manuel, les messages d'erreur de I'Applesoft sont 
expliques dans le texte du manuel et dans I'Annexe C. D'autres 
informations sont donnees a ce sujet dans le Manuel de Reference 
Applesoft. 

Le systeme d'exploitation, comme DOS ou Pascal, donne ^ 
egalement des messages d'erreur. Si vous trouvez done un ^ 
message qui ne vous est pas familier, regardez le manuel relatif au 
systeme d'exploitation. 

Instructions et commandes 

Les instructions de I'Applesoft sont decrites completement dans le 
Manuel de Reference Applesoft. 

Les commandes utilisees par le systeme d'exploitation disque sont _^ 
decrites dans le Manuel DOS. jL^ 

L' Apple lie comporte des sous-programmes d'entrees/sorties 
incorporees dans le firmware (memoire morte). Voir a ce sujet le _ 
Manuel de Reference Apple lie pour des informations 
complementaires. 



Magnetophones a cassettes 

Tous les programmes de ce manuel peuvent etre sauvegardes sur — 
des cassettes si vous ne disposez pas d'unite de disque. Le Manuel ^ 
de Reference Applesoft explique comment utiliser un 
magnetophone a cassette avec I'Apple He. 



- 
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Encore des informations utiles 



Les informations suivantes, bien qu'un peu disparates, sont loin 
d'etre inutilisees. 



Impression de programmes Applesoft 

Si votre Apple He dispose d'une imprimante connectee, ou si vous 
avez acces a un materiel, utilisez les instructions suivantes pour 
imprimer vos programmes. 

1. Chargez le programme. 

2. Frappez PR#1 si I'imprimante est connectee par le 
connecteurl . Si le circuit imprime est connecte a un 
connecteur different, frappez le numero de connecteur apres 
PR#. 

3. Frappez RUN si vous voulez que les resultats de programme 
soient imprimes. 

4. Frappez LIST si vous voulez que le programme proprement dit 
soit imprime. 



La memoire de V Apple lie 

La memoire de I'Apple He peut etre utilisee a des fins diverses : 

1 . Pour stocker les instructions constituant votre programme. 

2. Pour stocker les variables, chames et resultats intermediates et 
finaux. 

3. Pour stocker les informations dont I'ordinateur a besoin : 
information pour le systeme, pour votre programme et des 
informations relatives a differentes choses contenues en 
memoire. 

4. Pour creer texte et graphique basse resolution qui normalement 
apparaTt sur votre ecran video. 

5. Pour creer du graphique haute resolution qui peut etre affiche 
sur votre ecran video. 



Encore des Informations utiles 
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Chacune de ces utilisations occupe en general, une portion 
differente de la memoire de I'ordinateur. L'information est placee 
dans differentes cases memoire reperees par leur adresse. Un bloc 
de 1024 cases est appele 1Kde memoire. Chaque case est reperee 
par son adresse, nombre entier qui permet a I'Apple lie de trouver 
la case pour ranger ou trouver l'information. Ces elements 
d'information, que vous voyez rarement dans le detail sous forme 
de langage machine, sont appeles octets. Chaque octet occupe une 
case memoire. 

La portion de la memoire de I'Apple lie, occupee dans un but 
determine, peut etre decrite en terme de cases memoire utilisees, 
habituellement designees par la plage d'adresse memoire. Si une 
plage d'adresse memoire est utilisee pour stocked votre 
programme, par exemple, ces adresses ne peuvent pas etre 
utilisees pour creer du graphique haute resolution sinon votre 
programme sera perdu. 

Dans le BASIC de I'Applesoft, les adresses memoire et les autres 
nombres sont affiches sous la forme decimate habituelle. 
L'ordinateur utilise cependant une representation hexadecimale. 
Pour vider les programmes experimentes, les adresses memoires 
sont quelquefois affichees avec les deux formes. Habituellement 
les nombres hexadecimaux sont precedes du caractere dollar ($). 



Signification du caractere d'attente 

L'une des fonctions du caractere d'attente est de vous indiquer que 
I'ordinateur attend une entree et de vous indiquer le langage 
attendu. Voici les caracteres d'attente que vous verrez 
frequemment : 

* pour un programme Moniteur 

> pour le BASIC Entier 

] pour le BASIC de I'Applesoft 

En regardant de caractere, vous pourrez facilement dire (si 
vous oubliez) quel langage est utilise par I'ordinateur. 
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Encore des Programmes a 
essayer 



Cette annexe contient des listes de programmes commentees. Elle 
presente des exemples pratiques d'utilisation du BASIC Applesoft 
et a plusieurs buts : 

1 . De construire des programmes astucieux et comprehensibles. 
Dans ces programmes, I'accent est mis sur I'entraTnement a la 
bonne programmation et vous aide a apprendre I'utilisation de 
quelques techniques et instructions nouvelles. 

2. De permettre un pont entre I'introduction a la programmation 
presentee dans ce manuel et les concepts de programmation 
avances presentes dans le Manuel de Reference du BASIC de 
/'Applesoft. 

3. D'offrir des sous-programmes que vous pourrez incorporer 
dans vos propres programmes. 

4. de continuer a rendre la programmation amusante. Les 
programmes presentes ici sont destines a etre utilises, 
modifies, experimentes puis abandonnes. 

Ces programmes sont sur le disque APPLESOFT SAMPLER que 
vous avez utilise au cours de la lecture et de votre travail avec ce 
manuel. Voici leur nom dans I'ordre de la presentation. 

• SCRAMBLER : jeu de melange de phrases qui montre 
clairement I'utilisation de certaines instructions et de la 
fonction RND. II laisse en outre "la bride sur le cou" a 
I'ecrivain imaginatif. 

• MAGIC MENU : un programme surprise qui contient de 
nombreuses routines utiles pour I'affichage de texte, I'entree 
de texte en utilisant le caractere souligne lie au curseur et la 
creation de menus cohviviaux, toutes avec un temps 
d'ecriture minimum. 
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• DISK MENU : programme qui affiche un menu presentant les 
programmes contenus sur le disque SAMPLER. II contient un 
exemple de menu et utilise les sous-programmes contenus 
dans le programme MAGIC MENU. 

• CONVERTER : squelette de programme utilise pour des 
conversions d'unite. Ce programme vous laisse beaucoup de 
place pour vous permettre d'ajouter des instructions et 
d'experimenter vos propres conversions pendant que vous 
apprenez a tailler un programme pour satisfaire vos besoins. 
Ce programme vous guide durant ce processus et vous aide a 
construire vos propres menus. 

Avant de bricoler avec les programmes du disque APPLESOFT 
SAMPLER, faites une copie de sauvegarde selon le procede dans le 
Guide de I'Utilisateur de I' Apple lie. Ensuite vous pourrez executer 
ces programmes, "jouer avec eux" et voir ce qu'ils font. 

Conseil pour les programmeurs novices 

Jusqu'a pesent vous avez appris de nombreuses instructions 
BASIC : le but de cette annexe est de vous montrer quelques 
techniques pour utiliser efficacement ces instructions. De meme 
qu'en redaction, peinture et autres arts vous pouvez apprendre 
beaucoup en etudiant le travail des autres. 

Vous apprendrez a eviter le piege du programme inutilisable car 
ecrit de telle maniere que meme le programmeur ne peut pas le 
comprendre. Vous apprendrez a eviter le programme "plat de 
spaghetti" : programme rempli d'instructions GOTO. Au lieu de cela 
vous apprendrez comment les professionnels ecrivent des 
programmes ayant une structure de blocs, ce qui permet a eux 
memes et a d'autres de comprendre ces programmes et de les 
modifier. 

C'est toujours un choc de se trouver soudainement en presence de 
programmes de 2,5 ou 10 pages alors que Ton a tout juste ecrit 
des programmes n'excedant pas dix lignes. Cependant, ils peuvent 
rester simples, comme par exemple le programme SCRAMBLER. 
Vous avez maintenant assez d'habilete pour le comprendre. Les 
trois autres programmes sont plus complexes mais vous serez plus 
recompense quand vous les aurez compris. Si vous commencez a 
vous sentir deborde, arretez. Travaillez un peu de votre cote et 
revenez ensuite a ces programmes. Au fur et a mesure que vous 
vous poserez davantage de questions, vous trouverez de plus en 
plus de reponses. 
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SCRAMBLER 



Avant d'etudier ce programme, executez-le pour voir ce qu'il fait. 
Cette presentation, de meme que les suivantes, suppose que le 
programme est dans la machine pendant que vous lisez. 

SCRAMBLER est un programme structure facile a comprendre. Les 
programmes structures sont composes de sous-programmes, qui 
effectuent chacun une tache determinee. Le programme principal 
est au debut (lignes 1000-1 160). II appelle quatre blocs de second 
niveau (sous-programmes) qui ressemblent a des elements d'une 
chaine haute fidelite en ce sens que chacun fait une tache 
specifique. 

SCRAMBLER effectue cinq taches 

1 . Donner des informations. 

2. Accepter les premieres moities de phrases. 

3. Accepter les deuxiemes moities de phrases. 

4. Afficher les phrases. 

5. Terminer le programme. 

Chacune de ces taches a ete affectee a un sous-programme 
distinct (ou bloc) avec un point d'entree defini clairement. Essayez 
en tapant 

RUN 1 180 

pour voir le bloc d'instruction par lui-meme. 

Chaque sous-programme est appele d'un niveau plus eleve par 
I'intermediaire de I'instruction GOSUB et chaque sous-programme 
se termine par I'instruction RETURN. (La raison de I'affichage du 
message PRETURN WITHOUT GOSUB ERROR est due au fait que 
vous avez fait debuter I'execution directement dans un sous- 
programme sans qu'il ait ete appele par une instruction GOSUB). 
Tout cela doit vous paraTtre facile car maintenant vous avez appris 
a ecrire des sous-programmes avec GOSUB et RETURN. Cela 
demande un peu de reflexion car au premier abord il paraft plus 
facile d'ecrire en mode non structure (avec de nombreuses 
instructions GOTO). Des que vous ecrivez un programme serieux 
atteignant 80 ou 100 lignes, vous decouvrirez soudainement que 
vous ne pouvez plus controler le monstre que vous avez cree. 
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En reflechissant quelques minutes a I'ensemble du programme que 
vous etes en train d'ecrire, vous pouvez eviter le programme du 
type "spaghetti". Quand un bloc devient si complexe que vous ne 
puissiez plus en avoir une vue serieuse, vous devez le couper en 
plusieurs blocs plus petits. 



Analyse des lignes du Programme 

Les trois premieres lignes de chacun des programmes presentes 
sont pratiquement les memes. La premiere (de numero 0) comporte 
le nom donne au programme lorsqu'il a ete ecrit, la date ou il y a 
ete ecrit et les initiales du responsable. Ces informations vous 
permettent d'avoir rapidement une idee du programme. 

La seconde ligne (de numero 1 ) contient le branchement a la 
routine principale qui debute toujours dans ces exemples a la ligne 
numero 1000, ce qui vous laisse de la place pour ajouter plus tard 
des instructions, si cela vous parait necessaire. 

La troisieme ligne (de numero 2) est un mini-programme complet. 
Tapez 

RUN 2 

puis 

LIST 1350 

pour voir ce qu'il fait. En supprimant les lignes d'un cote de I'ecran, 
le programme oblige APPLESOFT a abandonner les espaces 
supplementaires situes a I'interieur des instructions PRINT : vous 
pouvez editer aisement les instructions PRINT et REM. (Les espaces 
situes sur le cote droit de I'ecran ne sont pas copies). Chaque fois 
que vous souhaitez editer le programme, frappez RUN 2, puis 
TEXT. (Ceci est valable pour tous les programmes de I'Annexe E). 

Les lignes 1000 a 1060 sont au niveau le plus eleve du programme. 
En les lisant, vous pouvez comprendre exactement, ce que fait le 
programme et le role de chaque sous-programme. 
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Les lignes 1070 a 1 1 60 terminent le programme. Les programmes 
ne doivent comporter qu'une seule fin car vous pouvez souhaiter 
par la suite ajouter des instructions. Ici le programmeur decida deux 
mois apres avoir termine son programme, d'inclure la ligne 1 155 
qui renvoie I'utilisateur au Menu. Comme ce programme n'a qu'une 
seule sortie, il n'a pas ete necessaire de relire le programme en 
entier pour chercher d'autres instructions END avant de faire 
I'adjonction. 

Les lignes 1 180 a 1390 initialisent le programme et affichent les 
directions. 

La ligne 1200 doit etre incluse dans tous vos programmes qui 
utilisent un ecran 40 colonnes. (Le programme suivant, MAGIC 
MENU, a une ligne similaire pour un ecran de 80 colonnes). Vous 
ne pouvez jamais etre sur que I'utilisateur executera votre 
programme avec le mode ecran necessaire. Cette ligne a egalement 
pour effet d'annuler les consequences de la commande RUN 2. 
Ainsi il n'est pas necessaire de frapper TEXT avant d'executer le 
programme. 

La ligne 1210 sert a dimensionner les deux tableaux de chaTnes 
utilises pour stocker les premieres et secondes moities de phrases. 
De I'espace est alloue pour 1000 elements de chaque chaine, ce 
qui fait qu'un utilisateur aura besoin d'un temps de 6 a 8 heures 
pour les remplir tous et provoquer une erreur. Nous esperons que 
peu d'utilisateurs seront passionnes a ce point par ce jeu de 
melange de phrases. 

Des mots anglais (comme TITLE$ en ligne 1220) sont utilises 
comme nom de variable "chaine de caracteres" afin de les rendre 
plus faciles a identifier. Utilisez des noms mnemoniques pour les 
variables, qui sont peu pratiques, mais n'oubliez pas qu'Applesoft 
ne considere que les deux premiers caracteres de chaque nom de 
variable. (Le programme suivant contient davantage de noms de 
variables). 

Les lignes 1400 a 1540, sous-programme de second niveau 
acceptent les premieres demi-phrases. Ce sous-programme 
fonctionne de la facon suivante : I'utilisateur rempli le tableau 
FIRST$ avec des chaTnes et memorise dans la variable F le nombre 
d'elements remplis. 

Les variables compteurs gardent trace ; vous les avez deja utilisees 
dans les boucles FOR/NEXT. Une bonne regie a suivre pour decider 
si vous devez utiliser les instructions IF. ..THEN ou FOR/NEXT est la 
suivante 

• Quant ('utilisation d'une variable compteur est determinee 
(quand vous savez, par exemple, que vous voulez compter de 
1 a 10 puis vous arreter), utiliser la boucle FOR/NEXT. 

• Quand ('utilisation d'une variable compteur est indeterminee 
(quand vous ne connaissez pas le nombre exact), comme dans 
SCRAMBLER, utilisez I'instruction IF. ..THEN. 
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Les lignes 1400 a 1470 donnent des instructions a I'utilisateur. La 
ligne 1490 determine une fenetre avec defilement, afin que les 
entrees de I'utilisateur ne provoquent pas un defilement des 
instructions qui les feraient sortir de I'ecran. 

Les lignes 1500 a 1530 constituent une boucle : tant que 
I'utilisateur n'appuie pas sur les touches \§\ - , F est mcremente 
d'une unite et I'utilisateur peut introduire une nouvelle chaine. 

La ligne 1510 teste rapidement pour savoir si I'utilisateur a appuye 
sur la touche H . Pour cela, elle teste le "switch" immediatement 
apres que a ete appuye dans I'instruction INPUT de la ligne 
1500. 

La ligne 1520 s'assure que I'utilisateur n'a rien frappe avant que la 
variable F n'ait ete incrementee. Cela evite que les lignes blanches 
soient introduites dans les demi-phrases. Essayez en changeant la 
ligne 1520 

1520 F = F + 1 

pour voir si le programme fonctionne sans ce test d'erreur. 

Les lignes 1600 a 1720 donnent la seconde moitie des phrases. Ce 
sous-programme fonctionne comme le precedent. Seule la ligne 
message differe. 

Les lignes 1800 a 1950 contiennent les sous-programmes de 
second niveau qui combinent les demi-phrases de facon aleatoire et 
affichent les phrases ainsi obtenues a I'ecran. 

La ligne 1820 s'assure qu'il y a des demi-phrases a combiner. 
Sinon, elle renvoie au programme principal. Habituellement 
I'absence de phrases signifie que I'utilisateur desire quitter le 
programme. 

La ligne 1830 utilise I'instruction TEXT pour supprimer la fenetre 
placee a la ligne 1660 de telle facon que I'instruction HOME efface 
I'ecran tout entier. 

Les lignes 1910 a 1930 choisissent et affichent une phrase 
aleatoire. La ligne 1910 choisit les variables de phrase FF et SS a 
partir du nombre total de demi-phrases F et S. La ligne 1930 
affiche alors des demi-phrases separees par un espace. 
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Reglage Fin 



SCRAMBLER a deux defauts qui ont ete laisses de cote pour que 
vous travaillez dessus : 

1 . Les instructions standard INPUT d' Applesoft n'acceptent pas 
des virgules ou des "deux points" : essayez d'introduire une 
phrase comportant I'un de ces caracteres. Deux facons 
permettent de resoudre le probleme de ce type : prevenir 
I'utilisateur ou resoudre le probleme. Dans le premier cas, il 
vous suffit de prevenir I'utilisateur de ne pas frapper des 
virgules ou des "deux points" a I'interieur des phrases. 

Le programme MAGIC MENU vous permettra d'apprendre a 
construire un sous-programme d'entree qui resoud ce problem 
et comment I'introduire dans des programmes du type 
SCRAMBLER. Cette amelioration est plus dffficile mais donne 
un programme plus commode pour I'utilisateur. 

2. Si I'utilisateur frappe des espaces au debut ou a la fin des 
demi-phrases, les deux demi-phrases seront mises de cote 
(essayez !). Cela peut etre evite en supprimant les espaces 
inutiles au debut et en queue, tache complexe qui utilise les 
fonctions chaines LEFT$ et RIGHT$. Comme precedemment, un 
moyen simple, tant que vous ne disposez pas d'une telle 
fonctionnalite dans Applesoft, est de prevenir I'utilisateur au 
moyen d'un message. 

Essayez maintenant d'ajouter ces messages, a I'intention de 
I'utilisateur, apres la ligne 1360. Si les instructions ajoutees sont 
trop longues, remplacez instruction VTAB 4 de la ligne 1230 par 
un simple PRINT. Quand vous serez certains que le programme 
fonctionne correctement, sauvez le sur disque. Plus tard, vous 
souhaiterez revenir au programme SCRAMBLER afin d'essayer 
d'autres methodes avancees pour resoudre ces problemes. 
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Programme 



REM SCRAMBLER - SEPT, 1982 BY BG & TOG 

1 GOTO 1000: REM BEGINNING OF PROGRAM 

2 TEXT : PRINT CHR$ (21): POKE 33,33: HOME : END 

1000 REM THE SCRAMBLER - A SENTENCE SCRAMBLING GAME - 1982 

1010 GOSUB 1180: REM SET UP PROGRAM & DISPLAY DIRECTIONS 

1020 GOSUB 1400: REM INPUT 1ST HALF OF SENTENCES 

1030 GOSUB 1600: REM INPUT 2ND HALF OF SENTENCES 

1040 GOSUB 1800: REM DISPLAY SENTENCES 

1050 REM O.K., WE'RE DONE NOW, SO... 

1060 REM 

1070 REM *** END OF PROGRAM *** 
1 080 REM 

1090 REM NOTE: PROGRAMS SHOULD HAVE ONLY 1 EXIT 
1100 TEXT : HOME : VTAB 12 

1110 PRINT "Would you Like to play again (Y or N)? ";: GET INS 

1120 IF INS = "Y" OR INS = "y" THEN TEXT : HOME : GOTO 1020 

1130 IF INS < > "N" AND INS < > "n" THEN 1100 

1140 TEXT : HOME : VTAB 22 

1150 PRINT "Thanks for playing " 

1155 IF PEEK (6) = 99 AND PEEK (7) = 99 THEN PRINT CHRS (4); RUN HE.. 

LO": REM SEE NOTES FOLLOWING LINE 9060 IN THE DISK MENU PROGRAM 
1160 END 
1170 REM 

1180 REM *** DIRECTIONS *** 
1190 REM 

1200 PRINT CHRS (21): TEXT : HOME : REM TURN OFF APPLE'S 80-COLUMN TE 

XT CARD, SELECT TEXT, AND CLEAR THE SCREEN 
1210 DIM FIRSTS(999),LAST$(999):F = 0:S = 0: REM GIVE THE USER 1000 1ST 

AND 2ND STRINGS , _ nr „ T 

1220 TITLES = "*** THE SCRAMBLER ***": HTAB 21 - LEN (TITLES) / 2: PRINT 

TITLES 

1230 VTAB 4 

1240 PRINT "The scrambler is a word game. You will" 

1250 PRINT "be asked to type the first halves of" 

1260 PRINT "sentences such as 'Edwin cooked'.": PRINT 

1270 PRINT "You will then be asked for the second" 

1280 PRINT "halves of sentences such as 'a banana" 

1290 REM 

1300 PRINT "squash."': PRINT 

1310 PRINT "Type as many as you like; then command" 

1320 PRINT "the computer to combine random halves" 

1330 PRINT "into humorous sentences.": PRINT 

1340 PRINT "The hilarity rises with the number of" 

1350 PRINT "participants: what seems dull to you": PRINT "alone will be 

found hysterically funny" „„ T ., T .. _ a = » ra 

1360 PRINT "by a group of 10 otherwise normal people ; : PRINI - a sera 

nge phenomenon." 
1370 VTAB 23 

1380 INPUT "Press the RETURN key to begin. ";IN$ 
1390 RETURN 
1399 REM 
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1400 REM *** GET 1ST HALVES *** 
1410 REM 

1420 HOME : HTAB 9- 

1430 PRINT "The first half..." 

1440 VTAB 20 

1450 PRINT "Type the first halves of sentences." 
1460 PRINT "Press RETURN after each entry." 

1470 PRINT "Hold down OPEN-APPLE and press the": PRINT "RETURN key aftei 
your last entry.";: REM ALWAYS USE A SEMI-COLON AFTER PRINTS ON BO' 
TOM LINE 

1480 F = 0:OAK = 0: REM SET COUNTER TO 0: SET OPEN-APPLE KEY VARIABLE TO 



1490 POKE 34,2: POKE 35,18: HOME : REM SET SCROLLING WINDOW 
1500 INPUT FIRSTS(F) 

1510 IF PEEK ( - 16287) > 127 THEN OAK = 1: REM CHECK QUICKLY TO SEE II 

USER IS PRESSING THE OPEN-APPLE KEY 
1520 IF LEN (FIRSTS(F)) > THEN F = F + 1 : REM ADVANCE COUNTER IF A SI 
CCESSFUL ENTRY 

1530 IF OAK = THEN 1500: REM IF OPEN-APPLE-RETURN NOT PRESSED, LOOP B; 

CK FOR THE NEXT HALF-SENTENCE 
1540 RETURN 
1550 REM 

1600 REM *** GET 2ND HALVES *** 
1610 REM 

1620 TEXT : VTAB 1 : HTAB 9 

1630 PRINT "... the second half" 

1640 VTAB 20 

1650 PRINT "Type the second halves of sentences." 

1660 S = 0:OAK = 0: POKE 34,2: POKE 35,18: HOME : REM SET UP SECOND HALF 

SAME WAY AS FIRST 
1670 INPUT LAST$(S) 

1680 IF PEEK ( - 16287) > 127 THEN OAK = 1 : REM CHECK QUICKLY TO SEE II 

USER IS HOLDING THE OPEN-APPLE KEY 
1690 IF LEN <LAST$(S)) > THEN S = S + 1: 
1700 IF OAK = THEN 1670 
1710 RETURN 
1720 REM 

1800 REM ** DISPLAY SENTENCES ** 
1810 REM 

1820 IF F = OR S = THEN RETURN : REM IF THERE IS NOT AT LEAST 1 C0> 

PLETE SENTENCE, CANCEL 
1830 TEXT : HOME : HTAB 9 
1840 PRINT "Scrambled sentences:" 
1850 VTAB 20 

1860 PRINT "Press RETURN for a new sentence." 
1870 PRINT "Press OPEN-APPLE-RETURN to end." 
1880 OAK = 0: POKE 34,2: POKE 35,18: HOME 
1890 VTAB 17: INPUT INS 

1900 IF PEEK ( - 16287) > 127 THEN RETURN : REM IS USER PRESSING OPEN- 
APPLE? YES, THEN RETURN 
1910 FF = RND (1) * F:SS = RND (1) * S: REM SELECT RANDOM SENTENCE 
1920 VTAB 17 

1930 PRINT FIRSTSC F F) ; " ";LAST$CSS): REM AND PRINT IT 
1940 PRINT : PRINT 
1950 GOTO 1890 
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MAGIC MENU 

Une regie bien connue des informaticiens est que 10% d'un 
programme occupe 90% du temps machine. Supposons que vous 
ecriviez un programme pour I'etablissement de previsions de 
marche pour certains produits oleagineux. II ne vous faut pas plus 
de deux heures pour ecrire le programme, sans inclure les 
instructions pour I'utilisateur. Vous savez quand il faut introduire le 
prix de I'huile de grain. Ainsi tout apparait comme une serie de 
"curseurs clignotants". 

Malheureusement M. DUBOIS, votre superieur hierarchique 
souhaite utiliser votre travail et avoir une copie qu'il puisse utiliser 
sur son Apple II Plus. II vous faut a nouveau 3 ou 4 jours pour 
rendre le programme utilisable par M. DUBOIS. Quoi faire ? Utiliser 

MAGIC MENU. 

MAGIC MENU contient 5 blocs de sous-programmes qui ensemble 
font attention au temps consomme, et ce qui est le plus important, 
rendent votre programme utilisable par d'autres ("d'autres" signifie 
egalement vous-meme si vous reprenez le programme 2 mois sans 
I'avoir utilise et que vous essayez a nouveau de le faire marcher 
alors que vous ne vous rappelez plus ce que signifie le curseur 
clignotant). 

Les blocs sont intelligents. Par exemple, la subroutine Computer 
Identifier reconnaTt la version de I'Apple II utilisee, ainsi les autres 
subroutines peuvent tirer parti des caracteristiques de la machine. 
Cela vous permet d'utiliser a la fois les minuscules et les 
majuscules dans votre programme meme s'il doit etre execute sur 
un Apple II ou un Apple II Plus (les versions anciennes de I'Apple II 
ne disposent pas de minuscules a partir du clavier). 

Le code forme par chacun des blocs est tres complexe mais cela ne 
doit pas vous empecher de les utiliser. Ces blocs peuvent etre 
consideres comme des "boTtes noires" : vous leur donnez I'entree 
qu'elles desirent et elles font leur travail correctement. II n'est pas 
necessaire que vous compreniez comment la radio fonctionne pour 
trouver votre station favorite, de la meme facon ces blocs de 
subroutines executent des taches tres complexes dont vous 
n'aurez pas a vous encombrer. 

Les paragraphes suivants sont concentres exclusivement sur 
I'utilisation de ces blocs et pas sur leur fonctionnement. Vous 
trouverez a la fin de MAGIC MENU quelques conseils sur la facon 
de construire une bibliotheque pour vos bottes noires favorites ainsi 
qu'une discussion sur les noms de variable et la facon de les 
choisir. 
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Note pour les programmeurs confirmes 

MAGIC MENU, ainsi que les deux programmes suivants, utilisent 
une version Applesoft compatible avec I'interface standard Apple 
lie. 

Les instructions REM disseminees dans le programme MAGIC MENL 
donnent de nombreuses informations relatives a la facon d'utiliser 
la carte 80 colonnes, les instructions HTAB et VTAB et de lire la 
position du curseur. 



Fonctionnement des cinq sous-programmes : 
demonstration 

Ce paragraphe utilise des exemples, que vous devez essayer sur 
votre ordinateur. lis montrent le fonctionnement des cinq sous- 
programmes (bottes noires) et comment ils sont lies dans MAGIC 
MENU Les nouvelles lignes que vous entrez vous permettent de 
considerer chaque sous-programme comme un bloc isole 
d'instructions. 

Si vous n'avez pas encore execute MAGIC MENU, faites-le 
maintenant. Ensuite supprimez tout le programme en memoire a 
I'exception de I'ensemble des sous-programmes et abstenez-vous 
d'executer Computer Identifier qui debute a la ligne 63000, frappez 

DEL 1 000, 62999 
2000 END 

Maintenant, pour vous assurer que tout est normal, frappez 

RUN 2 
TEXT 

Cela doit mettre la machine dans le mode 40 colonnes et effacer 
I'ecran. Les lignes a 2 de MAGIC MENU ressemblent beaucoup 
aux lignes a 2 des autres programmes de cette Annexe E. Leur 
role est explique en detail a propos du programme SCRAMBLER. La 
ligne 1 reste parce que tous les exemples donnes debutent a la 
ligne 1000. Elle vous permet de frapper RUN au lieu de RUN 1000. 
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Le sous-programme Input 

Les lignes 100 a 299 constituent le sous-programme INPUT qui 
constitue une extension de I'instruction 

INPUT " "; AN$ 

Tout message, tel que Voulez vous la reponse en dollars ? (0, N) 
doit au prealable avoir ete donne. Vous pouvez indiquer le nombre 
maximum de caracteres que I'utilisateur peut introduire en 
initialisant la variable FL (FL pour "Field Length") avec un nombe 
compris entre 1 et 250. (Meme avec une reponse O/N comme ci- 
dessus, il est prudent de donner a I'utilisateur un peu d'espace 
pour s'exprimer. Si vous savez que I'utilisateur souhaitera 
probablement une reponse en dollars, vous pouvez mettre la 
reponse dans AN$ ; dans ce cas AN$ = "0". Alors il suffit que 
I'utilisateur appuie sur la touche RETURN pour dire "Oui". (Les 
utilisateurs d'Apple II et Apple II plus ne pourront pas donner cette 
reponse implicite. 

Ce sous-programme INPUT, execute sur un Appl e lie prendra en 
co mpte I'appui sur Tune des touches suivantes : |Escl @] et g] 
Si rEscl est appuyee ou si I'une des touches @] ou |] est appuyee 
en meme temps qu' une a utre touche le sous-programme donnera : 
[Esc1 = 1 si la touche [Esc]est appuyee, OAKEY = 1 si \6\ est 
appuyee, SAKEY = 1 si la touche © est appuyee. AN$ ne prendra 
pas en compte ce que I'utilisateur frappe avant d'appuyer sur I'une 
de ces touches ; et 0AKEY$ ou SAKEY$ contiendront la touche 
appuyee en meme temps que \5\ ou g] respectivement. 

Vous pouvez ignorer toutes ces possibilites. (Voici un exemple, 
frappez le et essayez le !) 

1000 AIIE = 1 : HOME 
1010 PRINT "Do you like margarine?"; 

1020 AN$ = " " : FL = : GOSUB 100 : IF ESCKEY <> 

OR OAKEY <> OR SAKEY <> THEN 1000 
1030 PRINT AN$ 
RUN 

Cet exemple n'utilise pas les possibilites particulieres du sous- 
programme INPUT, c'est-a-dire longueur de champs et 
reconnaissance des touches speciales. Mais meme en ignorant ces 
possibilites, vous serez capable d'utiliser le curseur clignotant 
souligne et les utilisateurs pourront frapper les caracteres virgule et 
"deux points". 

La ligne 130 liste toutes les variables utilisees (et pouvant etre 
modifiees par le sous-programme). Toutes les instructions REM des 
bonnes boites noires font cela. 
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Le sous-programme Get Return 

Les lignes 300 a 399 constituent le sous-programme "touche 
appuyee" du programme, elles font effectuer a I'Apple He une 
boucle jusqu'a ce que I'utilisateur appuie sur0 II existe de 
nombreux endroits, dans un programme, ou vous souhaitez dire 
quelque chose du type "Press to see the Oleomargarine Futures" 
et ensuite attendre jusqu'a ce que la touche Q soit appuyee. Ce 
sous-programme fait ce travail en fournissant le meme curseur que 
le sous-programme INPUT. 

Pour le voir fonctionner, frappez simplement 

DEL 1000, 1030 

1000 PRINT "Please press RETURN." ; 

1010 GOSUB 300 

RUN 

Dans cet exemple, vous ne donnez aucune information et aucune 
n'est renvoyee. II changera les valeurs de I, J, K, L et P. {La ligne 
1010 doit etre supprimee car elle etait utilisee dans I'exemple du 
sous-programme INPUT). 

Le sous-programme Screen Formatter 

Les lignes 400 a 499 constituent le sous-programme Screen 
Formatter. Cette boTte effectue un travail equivalent a 

400 PRINT AN$ ; " " ; : RETURN 

Mais de facon tres intelligente. 

D'abord il ne coupe jamais un mot en deux parties editees sur deux 
lignes consecutives : il cherche a partir de la fin de ligne, le premier 
espace et coupe la phrase a cet endroit, la suite etant editee sur la 
ligne suivante. Cela vous evite de perdre un temps important a 
rediger votre mode d'emploi de telle facon que les mots ne soient 
pas coupes en fin de ligne. II vous suffit de mettre votre texte dans 
AN$ et d'appeler ce sous-programme. 

Ensuite, ce sous-programme est actif pendant I'execution du 
programme. Si I'ordinateur dispose d'une carte 80 colonnes, il 
formatera correctement le texte pour 80 colonnes. 
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Enfin, si le programme est execute sur un Apple II ou Apple II Plus, 
Screen Formatter convertira toutes les minuscules que ces 
ordinateurs ne peuvent pas afficher en majuscules. Ainsi votre 
programme tout entier tire parti des possibilites de votre nouvel 
Apple He sans qu'il soit limite seulement a I'Apple He. 

Le sous-programme suppose que AN$ contient le texte que vous 
souhaitez afficher. II sera affiche en majuscules et minuscules si le 
sous-programme Computer Identifier a place AIIE a vrai (AIIE=1). II 
formatera en mode 80 colonnes si vous avez donne a COL80 la 
valeur vraie (COL80=1). Plus d'informations dans la ligne 1025. 
Essayez cet exemple : 

1 000 AIIE = 1 

1010 AN$ = "Margarine used to taste horrible 

and came with the coloring in a separate 

pouch. It has improved considerably. Is it good enough now 

to compete with the $4.98 

spread?" 
1 020 GOSUB 400 
1 030 GOSUB 1 00 

Apres I'execution dans ce mode, modifiez la ligne 1000 par 
1000 AIIE = 

et executez-le a nouveau. De cette facon votre ordinateur 
ressemblera a un Apple II ou un Apple II Plus : lent mais utilisable. 
Dans ces modeles, le sous-programme doit tester si chaque 
caractere (apres avoir trouve le 40 e caractere et recherche le 
premier espace pour couper le texte) est une minuscule. Si tel est 
le cas, une formule complexe est utilisee pour la transformer en 
majuscule afin de permettre un affichage correct (voir ligne 445). 
Notez aussi que lister de telles lignes sur un Apple II ou Apple II 
Plus provoque I'affichage des minuscules comme des "ordures". 
Le transcodage ne fonctionne que lors de I'execution du 
programme. 

Le sous-programme Menu Maker 

Les lignes 500 a 899 contiennent le quatrieme bloc appele Menu 
Maker. Ce sous-programme cree un menu correct en quelques 
minutes au lieu de jours. Frappez 

1000 AIIE = 1 
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et indiquez le nom du programme par : 

1010 TITLE$ = "Oleomargarine Futures Forecaster" 

Le nom du menu est 

1020 SUBTITLE$ = "Type of Margarine" 

Le choix propose par le menu est le suivant 

1030 MENU$(1) = "Corn Oil" 
1040 MENU$(2) = "Sunflower Seed Oil" 
1050 MENU$(3) = "Cottonseed Oil" 
1060 MENU$(4) = "Crude Oil". 
1070 MENU$(5) = "End the Program- 
Pour indiquer a Menu Maker que vous avez termine, faites : 
1080 MENU$(6) = "END". 

II accepters aussi "End" ou "end". En 1090, la chafne FROM$ sera 
mise a zero car il n'y a pas de menu secondaire dans cet exemple. 
Cependant, dans le cas d'un programme a plusieurs menus, la 
variable FROM$ contient le nom du me nu d 'ou vient I'utilisateur. 
Quand FROM$ n'est pas nul, la touche lEicl est testee e t le message 
suivant apparaft : To return to the main menu, press the lEscl key. 

1090 FORM$ = " " 

Vous pouvez aussi proposer une explicitation des differents choix 
du menu dans votre programme. MAGIC MENU peut le faire. Dans 
notre cas, il n'y a pas de tableaux de description, aussi OAKEY 
recoit la valeur logique "faux" (OAKEY = 0). 

1100 OAKEY = 

Enfin ajoutez 

1110 GOSUB 500 
1 120 PRINT AN, AN$ 



Magic Menu 



Vous pouvez constater que le numero du choix selectionne dans le 
menu est place a la fois dans AN et AN$. II vous a fallu seulement 
quelques minutes pour composer ce menu. Maintenant tapez RUN. 

C'est Magique ! 

Bien sur, toutes les options termineront le programme car vous 
affichez simplement AN, mais ne les utilisez pas. Votre programme 
pourrait aussi se brancher sur differents sous programmes traitant 
des differentes huiles. Referez-vous, pour plus de renseignements, 
a I'etude de la ligne 1670 dans la section "Autres Remarques sur 
MAGIC MENU". 

Le sous-programme Computer Identifier 

A present vous pouvez essayer le cinquieme et dernier bloc. Computer 
Identifier. La ligne 1 000 est la suivante pour I'instant : 

1000 AIIE = 1 

Pour que Computer Identifier puisse trouver quelle machine vous 
utilisez, faites : 

1000 GOSUB 63000 

AIIE recevra la valeur 1 si le programme tourne sur Apple He et sur 
Apple II ou Apple II Plus. La variable RESULTS peut recevoir les valeurs 
suivantes : 

• pour Apple II ou II Plus 

• 3 2 pour Apple //e 

• 64 pour Apple He avec une carte texte Apple lie 80 Colonnes 

• 128 pour Apple He avec une carte texte Extension 80 Colonnes 

Afin d'utiliser les Cartes Texte Apple /fe 80 Colonnes ou Extension 
80 Colonnes et de permettre aux sous programmes Menu Maker et 
Screen Formatter de savoir s'il y a une telle carte, ajoutez : 



1005 IF RESULTS > = 64 THEN COL80 
CHR$(4) , "PR#3" 



1 : PRINT 



Faites executer le programme. Si vous n'avez pas de carte, rien ne se 
passera. Si vous en avez une, votre ecran affichera 80 colonnes. Pour 
revenir en 40 colonnes, tapez simplement 



RUN 2 
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Autres remarques sur Magic menu 

Pour recharger le programme, tapez 

LOAD MAGIC MENU 

Vous avez explore toutes les "boites noires" ; maintenant regardons ies 
lignes du programme construit dessus. II y a tres peu de difficultes dans 
ces lignes ; pour I'essentiel, vous pouvez regarder les listings et 
executer le programme pour comprendre ce qui se passe. Certaines 
lignes, par contre, qui demandent des commentaires, sont etudiees 
dans ce chapitre. 

Ligne 1010 : Applesoft place chaque variable rencontree pendant 
I'execution du programme dans une table de variables contenant les 
valeurs actuelles de ces variables. Chaque fois qu'un programme 
consulte ou modifie la valeur d'une variable, Applesoft examine la table 
verifiant chaque variable apres I'autre. En declarant en premier les 
variables les plus utilisees, vous pouvez augmenter la vitesse du 
programme. 

Ligne 1 360 : les utilisateurs ayant une carte texte 80 colonnes peuvent 
avoir sur leur ecran davantage de texte que ceux ayant 40 colonnes. Le 
programme en profite pour offrir davantage d'informations pour les 
utilisateurs ayant 80 colonnes. 

La ligne 1640 traite les demandes d'explications. 

La ligne 1645 traite une demande de retour a DISK MENU. 

La ligne 1 670 envoie I'utilisateur a la sous section de programme 
demandee. ON AN GOSUB 2000, 3000, 4000 ira a un sous programme 
commencant a la ligne 2000 si AN = 1 ; 3000 si AN = 2, 4000 si AN 
= 3,... Remarquez, quand vous utilisez ON GOSUB, il n'y a pas de 
relation logique entre le contenu de la variable et le sous programme 
vers lequel elle envoie I'execution. MENU MAKER n'autorise pas des 
nombres non prevus, aussi une verification d'erreur dans AN est deja 
faite. 
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Les lignes 1800 a 1890 sont tres semblables aux lignes ci dessus. 
Elles traitent des demandes d'explication et branchent aux sous 
sections appropriees. 

La ligne 2010 effectue le tri des verifications d'erreurs dont vous 
avez besoin pour que votre programme soit universel. (Vous 
pouvez tester votre programme en mode Apple II Plus, pour cela il 
suffit d'affecter la valeur a la variable AIIE au lieu d'utiliser le 
sous programme Computer Identifier.) 



Vitesse du programme 

Quand Applesoft execute un programme, il lit chaque numero de ligne 
en sequence. Plus un programme est long, plus sa duree d'execution 
est grande ; un element de tableau prend plus de place a trouver 
qu'une variable simple. 

Applesoft execute des sous programmes d'autant plus vite que le 
numero des lignes est petit. Aussi, il vaut mieux reserver les petits 
numeros aux sous programmes qui doivent etre executes souvent dans 
le minimum de temps. Les programmes principaux sont plutot vers la 
fin car il sont appeles une seule fois. 

Pour mieux voir la difference dans les temps d'execution, comparez les 
deux petits programmes suivants : 

10 I = I + 1 : IF I < 300 THEN 10 
20 STOP 
RUN 10. 

et 

50000 I = I + 1 : IF I < 300 THEN 50000 
50010 STOP 
RUN 50000 
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Quelques mots sur les noms de variables 

Devenu familier avec les boTtes noires et leur fonctionnement, vous 
voudrez sans doute en faire vous-meme. Les lignes ci-dessus sont 
justement la pour vous aider. 

II vaut mieux en general utiliser des noms de variables descriptifs pour 
rendre le programme plus lisible : AIIE = 1 vous dit quelque chose, pas 

L3 = 1. 

Souvent, la vitesse d'execution de vos programmes est un resultat de 
votre programmation. Si vous utilisez peu de variables, declarees tot 
dans le programme et utilisees dans tous les sous programmes rapides, 
votre programme ira beaucoup plus vite, jusqu'a 3 ou 4 fois. 

Heureusement, il y a des reperes, bases sur des conventions remontant 
a 1950 pour les variables de grande vitesse. 8 noms de variables 
standard et non descriptifs sont utilises pour accelerer I'execution. Bien 
entendu, elles echappent a la regie selon laquelle il faut utiliser des 
noms descriptifs. Ce sont : 

I, J, K, L, M, N, 0, P 

I est la plus commune de toutes, puis J, etc... On utilise souvent P poui 
la fonction PEEK, pour tester le clavier et autres elements hardware. 

II vaut mieux utiliser ces variables dans un sous programme et pas 
entre deux sous programmes. Dans ce cas la, prendre plutot des noms 
qui signifient quelque chose. 

Si vous voulez appeler un sous programme de niveau inferieur (ex : 
sous programme INPUT) tout en ayant une execution ultra rapide dans 
une routine de niveau superieur (exemple : Menu Maker), utilisez la 
lettre en double dans le sous programme de plus haut niveau : 

II, JJ, KK, LL, MM, NN, 00, PP 
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Cela empechera le sous programme de niveau inferieur de detruire 
des valeurs dans celui de niveau superieur. Par exempie, Menu 
Maker n'utilise que des variables double lettre parce qu'il utilise a la 
fois les sous programmes INPUT et Screen Formatter. 

Assurez-vous grace a des instructions REM des variables que vous 
affectez a ces sous-programmes. 

Finalement, n'utilisez pas ces variables a moins d'avoir vraiment 
besoin de la vitesse si vous ne voulez pas transformer vos sous 
programmes favoris en boTtes noires. Vous devez pouvoir lire et 
comprendre votre programme et, pour cela, utilisez au maximum 
des noms descriptifs. 

En suivant ces reperes dans la creation des 5 blocs sous 
programmes dans ce programme, I'auteur a permis aux 
programmeurs I'utilisant la plus grande facilite de construction de 
leurs propres programmes. 



Quelques remarques sur la logique 

Le BASIC Applesoft utilise une logique appelee Booleenne, basee sur 
les valeurs faux, vrai, et 1 . 

Quand vous dites 

X = : IF A = 23 THEN X = 14 

vous demandez a Applesoft de voir si A = 23 est vrai, si c'est vrai il 
executera les instructions suivantes. On peut faire la meme chose 
d'une autre manieres : 

X = 14 * (A = 23) 

C'est un peu plus difficile a croire. Essayez en execution immediate en 
donnant d'abord a A la valeur 23, puis en rendant A egal a quelque 
chose d'autre que 23. 

Tapez 

A = 23 

X = 14 * (A = 23) 
PRINT X. 



A = - 32.68 

X = 14 * (A = 23) 

PRINT X. 
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Quand Applesoft rencontre un argument Booleen (A =23) il regarde 
si c'est vrai (1 ) ou faux (0). (1 4 * 0) vaut et (1 4 * 1 ) vaut 14. 
(Vous pouvez etudier la logique Booleenne plus en detail dans 
la section sur IF... THEN du Manuel de Reference Applesoft). 

MAGIC MENU utilise beaucoup de drapeaux vrai ou faux pour 
communiquer entre des programmes. Un drapeau est une variable 
dont la valeur (1 ou 0) indique si une conditions est vraie ou si un 
evenement s'est produit. Cela permet de controler les effets des 
programmes a n'importe quel moment. 

Par un drapeau, Computer Identifier communique au programme 
Screen Formatter que le programme tourne sur Appel He (AIIE = 1 
Alors Screen Formatter peut prendre des decisions basees sur IF 
AIIE = 1 THEN ou IF AIIE THEN. Le programme INPUT vous avertit 
que la touche \6\ a ete enfoncee, en donnant a I'etiquette OAKEY I 
valeur vraie. Vous pouvez alors aller plus loin et voir ce qu'il y a ei 
OA$ pour trouver quelle cle a ete enfoncee. 

Une bonne habitude est de declarer les deux noms de variables 
TRUE et FALSE en tete du programme : 

1000 FALSE = : TRUE = 1 

Ainsi, vous pouvez voir plus clairement ce que vous faites : 

1010 AIIE = TRUE 

1020 IF AIIE = TRUE THEN PRINT "TRUE" 
1030 IF AIIE = FALSE THEN PRINT "FALSE". 

Beaucoup de jeunes programmeurs evitent les etiquettes et 
preferent d'autres types de test. II y a quelques annees, un 
programmeur Apple voulait stocker I'age de I'utilisateur dans la 
variable YEARS. Son sous programme pour le faire demandait 
d'abord a I'utilisateur son age en annees et mois. Puis, il divisait 
les mois par 12, les ajoutait aux annees et finalement prenait 
rentier YEARS + .5 pour I'arrondir a I'annee la plus proche : 

YEARS = INT (YEARS + .5) : RETURN 
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Quand le sous-programme se terminait, le programme qui I'avait 
appele devait savoir si I'utilisateur avait bien repondu ou 
simplement appuye 0. Le programmeur decouvrit qu'il pouvait 
I'indiquer en testant simplement la variable YEARS : 

1000 IF YEARS THEN (continuez le programme) 

Cela marcha tres bien jusqu'a ce qu'un college tapat I'age de son 
bebe : an, 2 mois. Le programme arrondit la reponse a 0. Et il 
continua de demander sans arret quel age avait Betty. 

Vous n'epuiserez pas les noms de variables il y en a plus de 5000. 
Utilisez une etiquette et donnez lui un nom descriptif. 



Programme 



REM MAGIC MENU 

1 GOTO 1000 

2 TEXT : PRINT CHRS (21) 



SEPT, 1982 BY TOG 

HOME : POKE 33,33: END 



REM *** INPUT ROUTINE *** 
REM SEPT, 1982 BY B. TOGNAZZINI 
REM USES FLASHING UNDERLINE CURSOR 

REM YOU MAY SET THE NUMBER OF CHARACTERS THE USER MAY TYPE (THE FIEL 
D LENGTH) IN THE VARIABLE FL 

REM A FIELD LENGTH OF (FL=0) ALLOWS THE MAXIMUM INPUT 
REM IF YOU WANT A "DEFAULT" (SUPPLIED-BY-YOU) ANSWER, PUT IT IN AN$. 
FOR EXAMPLE : AN$ = "CAT" 

REM UPON RETURN, AN? (ANSWER!) WILL CONTAIN THE INPUT FROM THE USER 
REM ESCKEY WILL BE SET TO TRUE (WILL EQUAL 1) IF THE USER PRESSED IT 
TO EXIT THE INPUT 

REM SAKEY OR OAKEY WILL RF SET TO TRUE (WILL FOUAL 1) IF THE USER PR 
ESSED ANY CHARACTER KEY WHILE HOLDING THE SOLID-APPLE OR OPEN-APPLE 
KFY, RESPECTIVELY 

REM ABOVE 3 KEYS ARE ONLY READ IN AN APPLE HE: PROVIDE SOME OTHER M 
ETHOD OF SIGNALLING FOR All AND AII+ OWNERS 

REM THE ROUTINE USES (AND MAY CHANGE THE VALUES IN) I,J,K,L,M,P,rL,t 
S (FOR ESCAPE KEY), OA (FOR OPEN-APPLE KEY) ,SA (FOR SOLID-APPLE KEY), 
FL,IS,OA$,SA$,ANS 
REM * TAKE INPUT * 
HO I = 5: J = 0:K = 0:L = 0:M = 0:1$ = "":ESC = 0:OA 
SA$ = "": IF FL = THEN FL = 245 
IF NOT AIIE THEN INPUT "";AN$: RETURN 
PRINT AN$;:J = LEN (ANS) 
U9 M = PEEK (37) 

153 L = PEEK (36): IF COL80 THEN IF L = PEEK (1U7) THEN L 

03): REM FIND CURRENT HORIZ POSITION WITH 80 COLUMN CARD TURNED ON 
155 PRINT " ";I$;" "; 

160 N = 1: IF L » LEN (II) > - PEEK (33) - 3 AND 

5) - 1 THEN N - 
165 POKE 36, L : POKE 1403, L: VTAE5 f, + 1 
170 I = I - 1: IF I < THEN K - 1 - K:I = 5: PRINT 
175 POKE 36, L : POKE 1 403, L : VTAB P + 1 
180 P = PEEK ( - 16334): IF P < 128 THEN 170 
185 IF PEEK ( - 16287) > 127 THEN OAKEY = 1 
190 IF PEEK ( - 16286) > 127 THEN SAKEY = 1 
195 POKE - 16368, 0:K = 0:1 = 



•on 
1 02 
105 
110 

1 15 
1 20 

1 ?4 
1 25 

1 26 



127 



1 30 



1 35 



142 

145 



0:OAS = "":SA 



0: 



PEEK (37) 



CHPJ (32 + 63 



PEEK (14 



f EK (3 



> ) , 
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200 IF OAKEY THEN OAS = CHR$ (P - 128):AN$ = ANS + 1$: PRINT 1$;" ": RET 

: REM * OPEN-APPLE KEY 
205 IF SAKEY THEN SA$ = CHR$ (P - 128):AN$ = AN$ + 1$: PRINT 1$;" ": RET 

: REM * SOLID-APPLE KEY 
210 IF P > 159 AND P < > 255 THEN IF J + LEN (1$) < FL THEN IF N THEN 

ANS = ANS + CHR$ CP - 128) : J = J + 1: PRINT CHR$ CP);: GOTO 149 
215 IF P < > 255 THEN 240: REM DELETE KEY 

220 IF J THEN PRINT " "; : POKE 36, L: VTAB M + 1: PRINT CHR$ (136) ; :J = 
J - 1 

225 IF J = THEN ANS = "" 

230 IF J THEN ANS = LEFTS (ANS, J) 

235 GOTO 149 

240 IF P < > 136 THEN 265: REM * SACK ARROW KEY 

245 IF J THEN PRINT " ";: POKE 36, L: VTAB M + 1 : PRINT CHRS (136);:I$ = 

RIGHTS (ANS,1) + IS:J = J - 1 
250 IF J = THEN ANS = "" 
255 IF J THEN ANS = LEFTS (ANS, J) 
260 GOTO 149 

265 IF P = 141 THEN ANS = ANS + IS: PRINT 1$;" ": RETURN : REM * RETURN 
KEY 

270 IF P < > 149 THEN 294: REM * FORWARD ARROW KEY 
275 IF NOT LEN (IS) THEN 149 

280 ANS = ANS + LEFTS (IS,1):J = J + 1: PRINT LEFTS (I$,1); 
285 IF I EN ( IS) = 1 THEN IS = "" 

290 IF LEN (IS) THEN IS = RIGHTS (IS, LEN (IS) - 1) 
292 GOTO 149 

294 IF P = 155 THEN ESCKEY = 1: PRINT : RETURN : REM ESCAPE KEY PRESSED 
296 GOTO 149 
298 REM 



300 REM ** GET RETURN ROUTINE ** 

305 REM USES I,J,K,L,P 
310 IF AI IE THEN 325 

315 GET ANS: IF ASC (ANS) < > 13 THEN 315 

320 PRINT : RETURN 

325 I = 0:J = 0:K = 

330 I = I - 1: IF I < THEN K = 1 - K:I = 5: PRINT CHRS (32 + 63 * K); 
335 IF I < > 5 THEN 355 

340 L = PEEK (36): IF COL80 THEN IF L = PEEK (1147) THEN L = PEEK (14 

03): REM FIND CURRENT HORIZ POSITION WITH 80 COLUMN CARD TURNED ON 
345 IF L = THEN POKE 36, PEEK (33): VTAB PEEK (37) 
350 IF L < > THEN POKE 36, L - 1 

355 P = PEEK ( - 16384): IF P < > 141 THEN 330: REM NOT A RETURN 
360 PRINT " "; 

365 IF PEEK (37) = 23 THEN VTAB 23: REM PEEK(37) CONTAINS CURRENT VTAB 
POSITION -1. IF ON BOTTOM LINE (VERY COMMON WITH WAIT-FOR-RETURN-K 
EYS) MOVE UP ONE TO PREVENT SCREEN FROM SCROLLING 
370 PRINT 

375 POKE - 16368,0: RETURN 
399 REM 



..00 REM «** SCREEN FORMATTER ROUTINE *** 

401 REM STRING TO BE PRINTED IN ANS 

402 REM IF SO COLUMN BOARD IS TURNED ON, MAKE SURE C0L80 =1. IF BOARD 
IS NOT TO BE USED, MAKE SURE C0L80 = 0. 

403 REM USES I, J, IS 

404 REM ROUG:i EQUIVALENT OF PRINT ANS;" "; 

405 REM USES AIIE SET BY COMPUTER IDENTIFIER ROUTINE 

406 REM USUALLY LEAVES 1 EXTRA BLANK AT END OF LINE 

407 REM PERFORMS WORD-WRAP AND WILL CONVERT LOWER- TO UPPER-CASE IF USED 

INSIDE AN APPLE II OR 11+ 

410 I = LEN (ANS): IF NOT I THEN RETURN 

411 P = PEEK (36): IF C0L80 THEN IF P = PEEK (1147) THEN P = PEEK (14 

03): REM FIND CURRENT HORIZ POSITION WITH 80 COLUMN CARD TURNED ON 

412 IF NOT P THEN IF I > 1 THEN IF ASC (ANS) = 32 THEN ANS = RIGHTS 
( ANS, I - 1) 

413 IF P+2+ I< PEEK (33) AND AIIE THEN PRINT ANS; " ";:AN$ = "": RE 
: REM EXPRESS CHECK-OUT 
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4H IF I > 1 THEN IF RIGHTS (AN$,1) = " " THEN AN$ = LEFTS (ANS, I - 1 
) 

417 IF P + I < PEEK (33) THEN IS = ANS : ANS = "": GOTO 440 
420 J = PEEK (33) - P * 2:1 = J 

425 I = I - 1: IF I THEN IF MIDS (ANS, 1,1) < > " " THEN 425 

430 IF I = 1 THEN I = J 

431 IF I = THEN PRINT : GOTO 410 

435 1$ = LEFTS (ANS, I - 1): IF LEN ( ANS) > I THEN ANS = RIGHTS (ANS, LEN 

(ANS) - I): REM ISOLATE 1 LINE IN IS 
440 IF AIIE THEN PRINT IS; 

445 IF NOT AIIE THEN K = LEN (IS) + 1 : FOR I = 1 TO LEN (IS):J = ASC 

( RIGHTS (I$,K - I)): PRINT CHRS (J - 32 * (J > 96 AND J < 123));: NEXT 

I 

447 P = PEEK (36): IF COL80 THEN IF P = PEEK (1147) THEN P = PEEK (14 
03) 

450 IF LEN (ANS) THEN IF P < > THEN PRINT 
455 IF LEN ( ANS) THEN 410 

460 IF P < > THEN IF MIDS (IS, LEN (IS),1) < > " " THEN PRINT " " 

465 RETURN 
499 REM 



500 REM *** MENU MAKER ROUTINE *** 

505 REM SUPPLY PROGRAM TITLE IN TITLES, MENU TITLE IN SUBTITLES, CALLING 
MENU TITLE (WHERE USER CAME FROM) IN FROMS, 0A=1 IF HELP IS AVAILAB 
LE 



510 REM PUT MENU ITEMS IN MENUS( 1 ) THROUGH MENU$(12). REMEMBER TO DIM M 
ENUSH2) IF MORE THAN 10 ITEMS 

515 REM PROGRAM USES INPUT ROUTINE AND SCREEN FORMATTER. ALL VARIABLES 
AFFECTED BY THEM AS WELL AS II, J J , KK, LL, MM, NN, 00, PP, AN, IIS A 
RE AFFECTED 

520 REM USER'S CHOICE IS RETURNED IN BOTH ANS AND AN 

525 REM IF FROMS HAS A TITLE IN IT, ESCKEY WILL BE 1 IF USER WANTS TO G 
BACK TO CALLING MENU. MAIN MENUS SHOULD MAKE FROMS-"" (NOTHING) 

530 J = 0:K = 0:JJ = 0:KK = 0:LL = 0:MM = D:NN = 0:00 = 0:AN = 
535 00 = OA: REM STORE WHETHER DESCRIPTIONS ARE AVAILABLE 
540 ANS = "" 
545 II = 1 

550 KK = KK ♦ INT ( LEN (MENUSdl)) / (27 + 35 * (COL80 = 1))): REM APPR 

OXIMATE NUMBER OF EXTRA LINES MENU ITEM WILL TAKE 
555 IF II < 12 THEN IF MENUSdl + 1) < > "End" AND MENUS (II » 1) < > 

"end" AND MENUSdl t 1 ) < > "END" THEN II = II + 1: GOTO 550 
560 LL = II: REM NUMBER OF MENU ITEMS 

565 NN = 0: IF LL * 2 + KK < 14 THEN NN - 1 : REM DETERMINE IF MENU CAN BE 
DOUBLE-SPACED 

570 MM = 3: IF COLSO THEN MM = 9: REM SELECT LEFT MARGIN OFFSET: 3 IF 40 

COLUMN, 9 IF 80 COLUMN 
575 J J - 3 + MM: IF LL > 9 THEN JJ = 4 + MM: REM IF MORE THAN 9 ITEMS, IN 

DENT NAME OF EACH BY 1 MORE 
580 REM 



585 REM * DISPLAY MENU ROUTINE ♦ 
590 TEXT : HOME 

595 ANS = TITLES: GOSUB 400: POKE 36, PEEK (33) - LEN (SUBTITLES) - 1:AN 

S = SUBTITLES 
600 GOSUB 400 

605 FOR II = 1 TO PEEK (33): PRINT "_";: NEXT : PRINT 

610 REM PRINT SELECTIONS 

615 FOR II = 1 TO LL 

620 HTAB MM: PRINT II;". "; 

625 VTAB PEEK (37): IF COL80 THEN VTAB PEEK (1531): REM BELOW PRINT M 
OVES DOWN 1 LINE: THIS COMMAND IS A TRICK TO MOVE UP EXACTLY 1 LINE 
FIRST 
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630 POKE 32,JJ: POKE 33, PEEK (33) - JJ: PRINT : REM SET "WINDOW" SO THA 

T TEXT OF MENU ITEM IS INDENTED 
635 ANS = MENUS(II): GOSUB 400: REM PRINT MENU ITEM 

640 POKE 32,0: POKE 33, PEEK (33) + JJ: PRINT : REM "RESTORE" FULL WINDO 
W 

645 IF NN THEN PRINT 
650 NEXT II 

655 IF PEEK (37) > 16 THEN PRINT "TOO MANY MENU ITEMS OR TOO LONG LINE 
S.": STOP 

660 TEXT : VTAB 17:AN$ = "Select option >" : GOSUB 400: PRINT 
665 FOR II = 1 TO PEEK (33): PRINT "_";: NEXT 

670 IF NOT 00 OR NOT AIIE THEN PRINT : REM IF ROOM, SPACE DOWN 1 
675 IF LEN (FROMS) THEN AN$ = "For " + FROMS + ": press ESC": GOSUB 400 

680 PRINT 

685 IF AIIE THEN PRINT "To erase: use the DELETE key" 
690 AN$ = "To select: type a number from 1 to " + STR$ (LL) 
700 GOSUB 400: PRINT 
705 IF NOT 00 THEN 720 

710 IF AIIE THEN PRINT "For descriptions: press OPEN-APPLE-?" 
715 IF NOT AIIE THEN PRINT "FOR DESCRIPTIONS: FOLLOW ANSWER WITH ?" 
720 AN$ = "To go to selected item: press RETURN": GOSUB 400: PRINT 
723 IF NOT 00 THEN ANS = "(There are no descriptions available)": GOSUB 
400 

725 FL = 3:AN$ = "": REM SET-UP VALUES FOR INPUT ROUTINE BEFORE CALLING I 
T 

730 REM 



735 REM ** GET INPUT FROM USER ** 

740 VTAB 17: HTAB 17: CALL - 868: HTAB 17 

745 IF AIIE OR NOT LEN (FROMS) THEN GOSUB 100: GOTO 795: REM THE LINE 

S THAT FOLLOW ARE TO PICK UP AN ESC PRESS ON AN APPLE II OR 11+ 
750 I = 0: J = 0:M = PEEK (37):L = PEEK (36):0AKEY = 

755 I = I - 1: IF I < THEN K = 1 - K: I = 5: J = 1 - J: NORMAL : IF J THEI> 
INVERSE 

760 PRINT " ";; POKE 36, L: VTAB M + 1 

765 P = PEEK ( - 16384): IF P < 128 THEN 755 

770 NORMAL : REM ABOVE PRINTS A BLINKING CURSOR THE HARD WAY 
775 IF P = 155 THEN POKE - 16368,0: ESCKEY = 1: GOTO 795: REM ESC PRESS 
ED FIRST 

780 L = PEEK (36): VTAB 20: HTAB 1: CALL - 868: VTAB M + 1: HTAB L + 1 
785 INPUT "";AN$ 
790 REM 

END OF All AND AII+ ROUTINE 
795 VTAB 19 

800 IF NOT OAKEY THEN 825 

805 IF NOT 00 OR OAS < > "?" AND OAS < > "/" THEN 735: REM HELP NOT A 
VAILABLE (00 WAS SET TO VALUE OF OAKEY AT BEGINNING OF ROUTINE) OR W 
RONG KEY PRESSED 

810 REM JJ WILL NOW BE USED TO HOLD LENGTH OF ANS: 

815 JJ = VAL (ANS) : IF JJ > AND JJ < = LL THEN II = JJ: GOTO 880: REM 
EXIT MENU FOR HELP 

820 IF J J = THEN PRINT "--> PLEASE SELECT A NUMBER FIRST <— ";: CALL 

- 868: PRINT :ANS = "": GOTO 735 
825 IF SAKEY THEN 735: REM SOLID-APPLE KEY NOT USED FOR MENU 
830 IF ESCKEY THEN IF LEN (FROMS) THEN 880: REM IF ESCAPE KEY IS PRESS 
ED, MENU IS EXITED 

835 JJ = VAL (ANS): IF JJ > AND JJ < = LL THEN II = JJ: REM ISOLATE N 

UMBER FROM ANS AND MAKE II EQUAL IT 
840 IF LEN (ANS) = THEN 735 

845 IF 00 THEN IF NOT AIIE AND ( RIGHTS (ANS,1) = "?" OR RIGHTS (ANS, 
1) = "/") THEN IF II > AND II < = LL THEN OAKEY = 1: GOTO 880 

850 IF LEN ( ANS) THEN K = 0: FOR I = 1 TO LEN (ANS): J = ASC ( RIGHTS 

(AN$,I)):K = K + (J < > 32 AND (J < 48 OR J > 57)): NEXT I: IF K THE 

PRINT " — > PLEASE USE DIGITS <--";: CALL - 868: PRINT :AN$ = 

"": GOTO 735 

855 REM ABOVE LINE CHECKS FOR PRESENCE OF NON-NUMERIC CHARACTERS OTHER T 
HAN SPACE IN THE LINE; IF FOUND, THE LINE IS REJECTED 
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860 IF NOT JJ THEN IF LEN ( AN$) THEN K = 0: FOR I = 1 TO LEN (ANS): J 

= ASC < RIGHTS CAN$,I)):K = K + (J = 48): NEXT I: IF NOT K THEN PRINT 
__> PLEASE USE DIGITS <--";: CALL - 868: PRINT :AN$ = "": GOTO 

865 REM ABOVE LINE CHECKS FOR A SINGLE SPACE AS ANSWER (OTHERWISE, A SPA 

CE IS A ZERO) „ 

870 IF J J > LL THEN PRINT " — > ";JJ;" IS TOO LARGE <-- ;: CALL - 

868: PPINT :AN$ = "": GOTO 735 
875 IF J J < 1 THEN PRINT " — > IS TOO SMALL <--";: CALL - 868:A 

N$ = "": GOTO 735 
880 AN = II: TEXT : HOME : RETURN : REM EXIT POINT FOR MENU PROGRAM 
885 REM 



1000 REM *** MAIN PROGRAM *** 

1010 I = 0:AN$ = "":J = 0:1$ = "":K = 0: REM DECLARE MOST OFTEN USED VARI 
ABLES FIRST FOR SPEED. 

1020 GOSUB 63000: REM FIND OUT IF AIIE OR NOT 

1021 DIM ME$(20) 

1025 IF RESULTS > = 64 THEN C0L80 = 1: PRINT CHR$ (4);"PR#3": REM IF A 
N 80-COLUMN CARD IS PRESENT, USE IT. IF YOU DON'T WANT IT, CHANGE T 
HE LINE TO: 

1025 PRINT CHR$(21) 

1030 TEXT : PRINT : HOME : REM TEXT CLEARS ANY OLD WINDOWS: PRINT CLEARS 
OUT ANY OLD HTAB AND VTAB INFORMATION: HOME CLEARS THE SCREEN 

1050 AN$ I = T "***°Magic Menu ***": POKE 36,( PEEK (33) - LEN ( ANS) ) / 2: GOSUB 

400: PRINT : REM CENTER TITLE 
1060 PRINT :AN$ = "Magic Menu has five basic subroutines upon which you 

can build your programs:" 
1070 GOSUB 400: PRINT : IF C0L80 THEN PRINT : REM BY CHANCE, THE SECOND 
LINE IS JUST LONG ENOUGH TO CAUSE AN EXTRA CARRIAGE RETURN IN 40-CO 

LUMN MODE r( ,, l|n 
1080 ANS = "1. COMPUTER IDENTIFIER: says you are now using an Apple . GUbUB 

400 

1090 ^F RESULT = THEN ANS = "II OR II+." 

1100 IF RESULT = 32 THEN ANS = "He." „ 

1110 IF RESULT = 64 THEN ANS = "lie with an 80-Column Card. 

1120 IF RESULT = 128 THEN ANS = "He with a Memory-Expansion Card. 

1130 IF C0L80 THEN GOSUB 400-.ANS = "The other four routines use the int 

ormation from COMPUTER IDENTIFIER to let your software take full adv 

antage of whatever Apple computer it is run on." 
1140 GOSUB 400: PRINT : PRINT 
1150 ANS = "2. SCREEN FORMATTER: ": GOSUB 400 

1160 ANS = "controls text display so that lines are ended between words i 

nstead of in the middle of them." 
1170 IF C0L80 THEN GOSUB 400:ANS = "It also automatically converts all 

lower-case letters to capitals when the program is run on an Apple I 

I or an Apple II+." 
1180 GOSUB 400: PRINT : IF C0L80 THEN PRINT 

1190 ANS = "3. MENU MAKER : lets you create uniform, friendly menus in mm 

utes, instead of days. (A sample menu follows.)" 
1200 GOSUB 400: PRINT : PRINT 

1210 ANS = "4. INPUT : is the flashing-underline cursor routine you learne 

d on Apple Presents... APPLE.": GOSUB 400 
1220 ANS = "": IF AIIE THEN ANS = "(Pick 1 from menu.)" 

1230 IF C0L80 THEN ANS = " (To reacquaint yourself with this input routi 

ne, select option 1 from the menu that follows.) 
1240 GOSUB 400: PRINT : PRINT 

1250 ANS = "5. GET RETURN: waits for you to press RETURN. It is waiting 
now..." 

1260 GOSUB 400: PRINT : PRINT 

1270 ANS = "Press RETURN to continue.": GOSUB 400: GOSUB 300: REM PRINT P 

ROMPT: WAIT FOR A RETURN 
1 299 REM 
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1300 REM *** "help" SCREEN *** 
1310 HOME 

1315 IF C0L80 THEN VTAB 4 

1320 AN$ = "A few words about the sample menu:" 
1330 GOSUB 400: PRINT : PRINT : PRINT 

1340 AN$ = "The following menu has six selections, only two of which act 
ally do something. The first selection shows you a familiar exampl 
of the flashing-cursor input routine; the last selection exits the 
program." 

1350 GOSUB 400 

1360 IF COL80 THEN AN$ = " The other four selections are there to take 
p space on the menu and in the program, so you can see how a more e 
aborate program would be structured.": GOSUB 400 

1370 PRINT : PRINT 

1375 IF C0L80 THEN PRINT 

1380 AN$ = "The Menu Maker enables you to give a description of each men 
item, so the user needn't first wade through pages of " + CHR$ (3 
) + "directions" + CHRS (34) + ":" 
1390 GOSUB 400 

1400 AN$ = "to see the description of option 1, type" 
1410 GOSUB 400 

1420 AN$ = "1? RETURN": IF AIIE THEN ANS = "1, then press OPEN-APPLE-?" 
1430 GOSUB 400: PRINT : PRINT 
1435 IF C0L80 THEN PRINT 

1440 ANS = "Explore the menu, then review the listings in Appendix E of 
he Applesoft Tutorial manual for details on how to use these routin 
s in your own programs." 

1450 GOSUB 400: PRINT 

1460 VTAB 24:AN$ = "Press RETURN to go to the menu.": GOSUB 400: GOSUB 
00 

1499 REM 



1500 REM ** SAMPLE MAIN MENU ** 

1510 REM ** MAIN MENU LOOP ** 

1520 TITLES = "Magic Menu": REM TITLE OF MENU 

1530 SUBTITLES = "Main Menu": REM TITLE OF MENU OR SUBSECTION OF PROGRAM 
1540 FROMS = "": IF PEEK (6) = 99 AND PEEK (7) = 99 THEN FR0MS = "the 

isk Menu": REM SEE NOTES FOLLOWING LINE 9060 OF DISK MENU PROGRAM 
1550 MENUS ( 1 ) = "A sample of the input routine" 
1560 MENUS(2) = "" 
1570 MENUS(3) = "" 
1580 MENUS C 4 ) = "" 
1590 MENUSC5) = "" 
1600 MENUSC6) = "End the program" 

1605 IF PEEK (6) = 99 AND PEEK (7) = 99 THEN MENUSC6) = "End the prog 
am and return to the Disk Menu": REM SEE NOTES FOLLOWING LINE 9060 
F DISK MENU 

1610 MENUSC7) = "END": REM MENU PROGRAM KEEPS DISPLAYING ITEMS UNTIL IT 

INDS THE WORD "END" 
1620 0AKEY =1: REM HELP AVAILABLE; OPEN-APPLE KEY WILL BE READ 
1630 GOSUB 500 

1640 IF 0AKEY THEN GOSUB 1810: GOTO 1510: REM "HELP" ASKED FOR 
1645 IF ESKEY THEN GOTO 7000: REM RETURN TO DISK MENU 
1650 ANS = "" 
1660 VTAB 8 

1670 ON AN GOSUB 2000,3000,4000,5000,6000,7000: REM RETURN PRESSED, SO 

TO THE SELECTED SECTION 
1680 VTAB 24 

1685 IF AN < > 1 THEN POKE 36,0: IF C0L80 THEN POKE 1147,255: REM TH 
SE 2 POKES ARE EQUIVALENT TO HTAB 1, BUT WORK IN EITHER 40 OR 80 CO 
UMN MODE 

1690 ANS = "Press RETURN for the menu.": GOSUB 400 
1700 GOSUB 300: REM WAIT FOR RETURN 

1705 IF C0L80 THEN VTAB 22: PRINT : PRINT CHRS (4);"PR#3": REM OPTION 

1 TURNS OFF 80-COL CARD (IF ANY) . THIS TURNS IT BACK ON 
1710 GOTO 1510 

1720 REM 
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1800 REM *** GO TO HELP *** 
1810 TEXT : HOME : VTAB 8 
1820 HOLDS = AN$ 

1830 ON AN GOSUB 9000,9200,9300,9400,9500,9600,9725, 9825,9925 
1850 AN$ = "Press RETURN to go to the menu.": GOSUB 400 
1860 GOSUB 300: REM WAIT FOR RETURN 
1870 AN$ = HOLDS 
1880 RETURN 

1890 REM BLANK LINES ARE DONE BY PRESSING THE DOWN-ARROW KEY 



2000 REM *** INPUT SAMPLE *** 

2010 IF NOT AIIE THEN ANS = "SORRY, THIS SAMPLE WORKS ONLY ON AN APPLE 

HE COMPUTER." : VTAB 10: GOSUB 400: PRINT : RETURN 
2015 PRINT CHR$ (21): REM TURN OFF 80 COLUMN MODE IF IT IS ON. TRY REM 

OVING THIS LINE TO SEE EFFECT ON PROGRAM 
2020 HOME : HT = 1: IF PEEK (33) > 40 THEN HT = 21 : HTAB HT 
2030 PRINT "Correct the answer in the box to read": GOSUB 400: PRINT 
2040 ANS = "A herd of cattle" 

2050 II = ( PEEK (33) - LEN (ANS)) / 2: POKE 36,11: REM POKE 36,X IS THE 
SAME AS HTAB X-1 , EXCEPT IT WORKS WITH EITHER 40 OR 80-COLUMN MODES 

2055 GOSUB 400: PRINT 

2060 POKE 36,11: PRINT " " 

2070 HTAB HT : ANS = "by doing the following:": GOSUB 400: PRINT : PRINT 
2075 HTAB HT + 1 

2080 ANS = "1. Press left arrow to back up to the": GOSUB 400: PRINT 
2085 HTAB HT + 4 

2090 ANS = "right of the " + CHRS (34) + "t" + CHR$ (34) + ' in the wor 

d " + CHRS (34) + "lot" + CHRS (34): GOSUB 400: PRINT 
2092 PRINT 
2095 HTAB HT + 1 

2100 ANS = "2. Press the DELETE key several times": GOSUB 400: PRINT 
2105 HTAB HT + 4 

2110 ANS = "to erase the words " + CHRS (34) + "whole lot" + CHRS (34): 

GOSUB 400: PRINT : PRINT 
2115 HTAB HT + 1 

2120 ANS = "3. Type " + CHRS (34) ^ "herd" + CHRS (34): GOSUB 400: PRINT 

: PRINT 
2125 HTAB HT + 1 

2130 ANS = "4. Now press the RETURN key to": GOSUB 400: PRINT 
2135 HTAB HT + 4 

2140 ANS = "accept the entire answer": GOSUB 400: PRINT 
2200 REM BOX 
2220 HTAB HT + 2 

2230 PRINT " 

2240 FOR I = TO 4: HTAB HT + 1 : PRINT "| 
|": NEXT : VTAB PEEK (37) 

2250 HTAB HT + 2: PRINT " __" 

2260 VTAB 19: HTAB HT + 4 

2270 ANS = "What is a " + CHRS (34) + "drift" + CHRS (34) + "?": GOSUB 

400: PRINT : PRINT 
2280 HTAB HT + 5 
2290 PRINT "> "; 
2300 REM GET INPUT 

2310 FL = 30: REM LENGTH OF FIELD 

2320 ANS = "A whole lot of cattle": REM THE "default" ANSWER (SUPPLIED B 

Y THE PROGRAM - THE USER CAN CHANGE IT) 
2330 GOSUB 100: REM INPUT 
2335 VTAB 24 

2340 IF ANS = "A herd of cattle" THEN ANS = "Perfect! ": GOSUB 400 
2350 IF ANS = "A HERD of cattle" THEN ANS = "Very good!": GOSUB 400 
2360 RETURN 

3000 ANS = "Sample routine number 2": GOSUB 400 

3999 RETURN 

4000 ANS = "Sample routine number 3": GOSUB 400 

4999 RETURN 

5000 ANS = "Sample routine number 4": GOSUB 400 
5999 RETURN 
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6000 AN$ = "SampLe routine number 5": GOSUB 400 

6999 RETURN 

7000 REM END 

7005 PRINT : REM DISK COMMANDS (SEE NEXT LINE) WILL NOT WORK IF THERE IS 
AN "OPEN" PRINT COMMAND SUCH AS A "PRINT;" OR "PRINT,". THEREFORE, 
ALWAYS DO A "PRINT" BEFORE ISSUING A DOS COMMAND 

7010 IF PEEK (6) = 99 AND PEEK (7) = 99 THEN PRINT CHRS (4);"RUN DIS 
K MENU": END 

7020 REM ABOVE LINE RUNS DISK MENU IF DISK MENU ASKED IT TO. SEE NOTES 

FOLLOWING LINE 9060 OF DISK MENU. 
7050 TEXT : HOME : TEXT : END : REM CLEAN UP S GO AWAY 
9000 REM *HELP SCREENS* 
9100 REM 

9105 ANS = "Option 1: the Apple He Input Routine" 
9107 VTAB 1 

9110 HTAB ( PEEK C33) - LEN CANS)) / 2 
9115 GOSUB 400: PRINT : PRINT 

9117 IF COL80 THEN VTAB 7: REM A DIFFERENT SPACING LOOKS MORE PLEASING 
IN 80-COLUMN MODE 

9120 ANS = "The Apple lie is equipped with a full ASCII keyboard, includi 
ng the DELETE key, a new key for the Apple II series.": GOSUB 400 

9122 PRINT : IF C0L80 THEN PRINT : REM BY COINCIDENCE, THE ABOVE SENTEN 
CE, IN 40-COLUMN MODE, IS JUST LONG ENOUGH TO "force" AN EXTRA CARRI 
AGE RETURN. SO, TO GET THE EXTRA SPACE IN 80-COLUMN MODE, WE MUST P 
R INT ONCE MORE 

9125 ANS = "Using the DELETE key and the flashing-cursor input routine in 

eluded within this program,": GOSUB 400 
9130 ANS = "you can scan forward and backward through your answers, inser 

ting and deleting characters at will.": GOSUB 400 
9135 ANS = " The input routine automatically gives the standard Applesof 

t BASIC blinking cursor to users of the Apple II or 11+.": GOSUB 400 

9145 PRINT : PRINT 

9150 ANS = "The input routine, along with the other routines in MAGIC MEN 

U, will enable you to easily create humanized programs.": GOSUB 400 
9155 GOSUB 400: PRINT : PRINT 

9160 ANS = "Since you are using an Apple II or II+, you cannot take advan 
tage of this cursor directly, but using it in your programs will mak 
e it easier for others." 

9165 IF AIIE THEN ANS = "Select option 1 to reacquaint yourself with the 
underline cursor." 

9170 GOSUB 400 

9180 IF C0L80 THEN PRINT : PRINT 

9199 RETURN 

9200 ANS = "There is no description available for this option.": GOSUB 40 

n 

9250 PRINT : VTAB 24 

9299 RETURN 

9300 ANS = "There is no option available for this description.": GOSUB 40 


9350 PRINT : VTAB 24 

9399 RETURN 

9400 ANS = "Sample help screen for option 4": GOSUB 400 
9450 PRINT : VTAB 24 

9499 RETURN 

9500 ANS = "Sample help screen for option 5": GOSUB 400 
9550 PRINT : VTAB 24 

9599 RETURN 

9600 ANS = "This option lets you gracefully exit the program.": GOSUB 40C 

9650 PRINT : VTAB 24 
9699 RETURN 
10000 RETURN 

63000 REM *** COMPUTER ID ROUTINE *** 
63010 REM *** AIIE OR NOT? *** 

63020 REM USES I,J,K,RE — SETS AIIE TO 1 IF IT IS AN AIIE 
63030 REM SETS RESULT DEPENDENT ON AVAILABLE HARDWARE 

63040 REM RESULTS OF MEANS NOT AIIE; 32 MEANS AIIE BUT NO 80 COLUMNS; 

64 MEANS AIIE WITH 80 COLUMNS BUT NO AUX MEM; 128 MEANS AIIE WITH A 
UX MEM 
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63050 DATA 8, 120, 173, 0, 224, 141, 208, 2, 173, 0, 208, 141, 209, 2, 

173, 0, 212, 141, 210, 2, 173, 0, 216, 141, 211, 2, 173, 129, 192, 1 

73, 129, 192, 173, 179, 251, 201, 6, 208, 73, 173 
63060 DATA 23, 192, 48, 60, 173, 19, 192, 48, 39, 173, 22, 192, 48, 34, 
160, 42, 190, 162, 3, 185, 0, 0, 150, 0, 153, 162, 3, 136, 208, 242 

, 76, 1, 0, 8, 160, 42, 185, 162, 3, 153 
63070 DATA 0, 0, 136, 208, 247, 104, 176, 8, 169, 128, 141, 207, 3, 76, 
73, 3, 169, 64, 141, 207, 3, 76, 73, 3, 169, 32, 141, 207, 3, 76, 7 

3, 3, 169, 0, 141, 207, 3, 173, 0, 224 
63080 DATA 205, 208, 2, 208, 24, 173, 0, 208, 205, 209, 2, 208, 16 173 

, 0, 212, 205, 210, 2, 208, 8, 173, 0, 216, 205, 211, 2, 240, 56, 17 

3, 136, 192, 173, 0, 224, 205, 208, 2, 240, 6 
63090 DATA 173, 128, 192, 76, 161, 3, 173, 0, 208, 205, 209, 2, 240, 6, 
173, 128, 192, 76, 161, 3, 173, 0, 212, 205, 210, 2, 240, 6, 173, 1 

28, 192, 76, 161, 3, 173, 0, 216, 205, 211, 2 
63100' DATA 240, 3, 173, 128, 192, 40, 96, 169, 238, 141, 5, 192, 141, 3 

, 192, 141, 0, 8, 173, 0, 12, 201, 238, 208, 14, 14, 0, 12, 173, 0, 

8, 205, 0, 12, 208, 3, 56, 176, 1, 24 
63110 DATA 141.. 4, 192, 141, 2, 192, 76, 29, 3, 234 
63120 J = 975:K = 724 
63130 FOR 1=0 TO 249 
63140 READ L 
63150 POKE K + I,L 
63160 NEXT 
63170 CALL K 
63180 RESOLTS = PEEK (J) 
63190 IF RESULTS < > THEN AIIE = 1 
63200 RETURN 
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DISK MENU a ete ecrit en deux heures a peine. En fait, il n'a pas 
exactement ete ecrit : I'auteur a utilise MAGIC MENU pour creer DISK 
MENU (bientot vous pourrez faire de meme). 

La methode est tres simple. Apres avoir charge MAGIC MENU, I'auteur 
a enleve tout ce qui n'etait plus utile, a change les noms des MENU$S, 
et elimine les sous-menus. 

Explorez ce programme pour qu'il vous devienne familier. Quand vous 
ecrivez vos propres programmes en utilisant le MAGIC MENU, employez 
DISK MENU comme base. Vous pouvez aussi vous reporter au listing 
de MAGIC MENU pour les details, et vous obtiendrez la vitesse accrue 
et la taille reduite de la version DISK MENU compacte. 

Si vous comparez les lignes 100 a 900 de DISK MENU et les memes 
dans MAGIC MENU, vous verrez une difference. Les sous-programmes 
sont plus compacts et les instructions REM ont ete en grande par'tie 
supprimees. Tous les noms de variables plus long que 2 caracteres ont 
ete reduits au minimum. 

La ligne 1030 fait sauter au programme les premieres instructions si 
DISK MENU a assigne la valeur 99 aux cases memoires 6 et 7, ce qui 
signifie que I'utilisateur n'en est pas a sa premiere execution. Referez 
vous a I'etude de la ligne 9060' qui suit. 

Les lignes 1047 a 1075 constituent le texte de DISK MENU. Comme le 
Screen Formatter de MAGIC MENU repartit automatiquement le texte 
non formate, I'auteur n'avait pas a faire attention aux fins de ligne en 
rajoutant ces lignes. En dehors de cela, il n'y a rien de particulierement 
nouveau ou interessant dans DISK MENU. C'est une illustration exacte 
de la maniere d'utiliser MAGIC MENU : un programme pratique 
fonctionnel, utilisant des entrees standard, des instructions claires, et 
des menus agreables a lire, a ete cree en un court laps de temps-. II a 
fallu plus d'un mois pour ecrire le bloc sous-programme sur lequel le 
programme est base ; cela ne prend que quelques heures pour 
construire quelque chose dessus. 

La ligne 3060 a ete mise precisement parce que I'auteur voulait savoir 
si Menu Maker traiterait convenablement une ligne aussi longue. 
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Les lignes 6000 a 6999 sont le sous-programme qui simule la 
frappe de la commande CATALOG. La commande est produite de 
maniere normale par la ligne 6080. Les commandes DOS peuvent 
etre executees a partir d'un programme Applesoft en tapant une 
chaine composee de [CtrD — D suivide la commande DOS ; comme 
CHR$(4) est le code ASCII pour [CtrD- D et que TITLE$ a la valeur 
"CATALOG" a la ligne 6030, la ligne 6080 produit le listing 
CATALOG sur I'ecran. 

La ligne 9060 est la cle par laquelle les programmes annexes 
reviennent a DISK MENU apres execution. Le probleme est de 
communiquer entre les programmes avec un drapeau : le drapeau 
est mis (si DISK MENU a ete execute), revenez ; sinon ne revenez 
pas On ne peut pas utiliser une variable standard comme drapeau 
entre deux programmes parce que toutes les variables sont mises a 
zero quand un programme demarre. Mais beaucoup de cases 
memoire ne sont pas affectees par Applesoft. Dans ce cas, I auteur 
a choisi les cases 6 et 7, placant la valeur arbitrage 99 dans 
chacune. Les chances que les deux cases se voient affecter par 
hasard la valeur 99 sont seulement de 1 sur 65536. 

Les sous-programmes de DISK MENU ont ete reduits a la moitie de leur 
leur taille dans MAGIC MENU et considerablement acceleres. 
L'outillage du programmer DOS offre des programmes qui 
compactent votre software et lui permettent en meme temps _ 
d'executer a une vitesse maximum. L'usage de ces utilitaires 
vous donne la possibility d'ecrire des programmes que vous pouvez 
lire et comprendre, tout en faisant une version compnmee 
executable a grande vitesse. 

II existe cinq types d'utilitaires particulierement utiles aux 
programmeurs Applesoft : 

1 Ceux qui compressent les programmes en enlevant les 
instructions REM, en raccourcissant les noms de variables a 
2 caracteres, en combinant des instructions qui peuvent etre 
mises ensemble. 

2 Ceux qui compilent ou transforment les instructions en langage 
machine, ce qui accelere de 100 fois I'execution. 

3 Ceux qui renumerotent les numeros de ligne aussi bien que les 
' lignes de reference de GOSUB et GOTO. (Cf la partie suivante 

pour explication sur cette techique). 
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4. Ceux qui vous permettent d'editer des lignes de programme 
plus facilement que le mode escape. 

5. Ceux qui fournissent des references croisees, vous disent aussi 
bien tous les noms de variables et les lignes ou ils sont utilises 
que les numeros de ligne appeles par des instructions GOSUB et 
GOTO. 



Renumerotation et fusion de portions de programmes 

Les applications dans cette partie utilisent un programme sur le disque 
DOS 3.3 SYSTEM MASTER appele RENUMBER. Ce programme a ete 
utilise par I'auteur de DISK MENU pour copier les menus de MAGIC 
MENU de telle maniere que seuls les contenus des chaTnes aient a etre 
reecrits. Avec I'habitude, vous apprendrez a moins taper que ce que 
vous faites actuellement et RENUMBER est la pour ca. 

Cet exemple et le suivant dans la partie d'apres vous permettent 
d'essayer la methode sur votre machine. Inserez le disque DOS 3.3 
SYSTEM MASTER dans votre lecteur si ce n'est deja fait. Puis tapez 

RUN RENUMBER 

Si vous utilisez un seul lecteur, enlevez la disquette SYSTEM MASTER 
et mettez la disquette APPLESOFT SAMPLER dans le lecteur. Si vous 
avez deux lecteurs, APPLESOFT SAMPLER peut etre place dans le 
second. (Les instructions qui suivent sont pour le premier cas. Si vous 
avez deux lecteurs, n'oubliez pas d'ajouter, D2 a la suite de la 
commande suivante). Tapez 

LOAD DISK MENU 

et, quand DISK MENU est charge, tapez 

DEL 0,1999 
DEL 3000,63999 
LIST 

Vous verrez qu'il ne reste pas grand chose. A present pour numeroter 
la portion de DISK MENU commencant a la ligne 7000, tapez 

& 7000 
LIST 
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Le menu est marque sur de nouveaux numeros de ligne. C est 
RENUMBFR qui fait cela. En utilisant "&" tout seul, vous renumerotez 
tout le programme en partant de la ligne 10 et de 10 en 10. & /OUU 
renumerote le programme a partir de la ligne 7000 et de 10 en 10. A 
present, pour le stocker, tapez. 



&H 

Maintenant, si vous listez le programme, vous verrez qu'il n'y a rien de 
visible ■ il est en memoire. &H dit au DOS de stocker quelque chose 
dans la memoire principale de I'ordinateur de maniere a ce que vous 
puissiez charger un autre programme. Cet outil est limite, bien sur pour 
la taille des programmes sur lesquels vous travaillez et la taille de la 
memoire de I'ordinateur. 



Avant de fusionner un programme dans un autre, assurez-vous que 
vous ne detruisez pas d'anciennes lignes. Tapez 



LOAD DISK MENU 
LIST 7000, 7999 

Vous ne verrez pas de listing car ces numeros de ligne n'ont pas 
utilises. Vous pouvez proceder a I'operation appelee fusionnage 
("merge" en anglais). Frappez 



&M 

pour fusionner les nouvelles lignes dans I'ancien programme. En 
changeant les noms de programme en de nouveaux noms, y compns le 
nom du menu secondaire dans le menu principal, et en donnant 
I'adresse du nouveau menu a I'instruction ON ...GOSUB de la ligne 
1230 vous pouvez encore indexer 12 autres programmes sur le disque. 
L'auteur a utilise cette methode (RENUMBER, &H, &M) 3 fois pour creer 
trois menus secondaires dans le programme. 

RENUMBER est un programme tres utile pour programmer. II donne 
beaucoup de souplesse. Quand vous avez des programmes si longs que 
vous ne pouvez plus les developper, vous pouvez creer des sous- 
programmes et les deplacer a d'autres numeros de ligne. 
RFNUMBER resoud le probleme d'avoir a placer 1 1 lignes 
supplemental entre les lignes 40 et 50 : deplacez simplement la ligne 
50 et ce qu'il y a au-dessus vers 500 ou 1000. Cela vous donnera 
toute la place voulue (voir le Manuel DOS pour des instructions 
completes de RENUMBER). 
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Programme 



REM DISK MENU - SEPT 1982 - BY TOG 

1 GOTO 1000 

2 TEXT : PRINT CHR$ (21): HOME : POKE 33,33: END 
100 REM 

*** INPUT ROUTINE *** 



140 I = 5 : J = 0:K = 0:L = 0:M = 0:1$ = "":ESC = 0:OA = 0:OA$ = " 

SA$ = "": IF FL = THEN FL = 245 
142 IF NOT AIIE THEN INPUT "";AN$: RETURN 
145 PRINT AN$;:J = LEN CANS) 
149 M = PEEK (37) 

153 L = PEEK (36): IF C0L80 THEN IF L = PEEK (114?) THEN L = 
03) 

155 PRINT " ";I$;" "; 

160 N = 1: IF L t LEN (IS) > = PEEK (33) - 3 AND PEEK (37) = P 
5) - 1 THEN N = 

POKE 36, L: POKE 1403, L: VTAB M + 1 



PEEK (14 



165 

170 1=1-1: IF I<0 THEN K 



1 



: ; 



PRINT CH R? (32 + 63 



175 

180 P = 
185 IF 
190 

195 

200 



POKE 36, L: POKE 1 403, L : VTAB ri + 1 

PEEK ( - 16384): IF P < 128 THEN 170 
PEEK ( - 16287) > 127 THEN OAKEY = 1 
IF PEEK ( - 16286) > 127 THEN SAKEY = 1 
POKE - 16368, 0:K = 0:1 = 
IF OAKEY THEN OAS = CHRS (P - 128):ANS = 



ANS + 1$: PRINT 1$; 



205 IF SAKEY THEN SA$ 



CHRS (P - 128):AN$ = ANS + IS: PRINT IS;" 



IF 
J + 



36, L: 
■ 1 



IF P > 159 AND P < > 255 THEN 
ANS = ANS + CHRS (P - 128): J = 
IF P < > 255 THEN 240 
IF J THEN PRINT " 
J - 1 

IF J = THEN ANS = "" 
IF J THEN ANS = LEFTS (ANS, J ) 
GOTO 149 

IF P < > 136 THEN 265 
I F J THEN PRINT " "; : POKE 

RIGHTS (AN$,1) + I$:J = J 
IF J = THEN ANS = "" 
IF J THEN ANS = LEFTS (ANS, J) 
GOTO 149 

IF P = 141 THEN ANS = ANS 
IF P < > 149 THEN 294 
IF NOT LEN (1$) THEN 149 
280 ANS = ANS + LEFTS (I$,1):J 

IF LEN (IS) = 1 THEN IS = "" 
IF LEN (1$) THEN IS = RIGHTS (IS, LEN (IS) 
GOTO 149 

IF P = 155 THEN ESCKEY = 1: PRINT : RETURN 
GOTO 149 
REM 



LEN (IS) < 
PRINT CHRS 



2 1 5 

2 20 

2 25 
230 
2 35 
240 
245 

250 
255 

260 

265 
270 
275 



285 
290 
292 
294 
296 
300 



FL THEN IF N THEN 
(P); : GOTO 149 



POKE 36, L: VTAB M + 1: PRINT CHRS (136); :J = 



VTAB M + 1: PRINT CHRS (136);: IS 



IS: PRINT IS;" 



J + 1: PRINT LEFTS (I$,1); 



** GET RETURN ** 



310 IF AIIE THEN 325 

315 GET ANS : IF ASC (ANS) < > 13 THEN 315 
320 PRINT : RETURN 
325 I = : J = 0:K = 

330 1 = 1 - 1: IF I < THEN K = 1 - K:I = 5: PRINT CHRS (32 + 63 * K) ; 
335 IF I < > 5 THEN 355 

340 L = PEEK (36): IF C0L80 THEN IF L = PEEK (1147) THEN L = PEEK (14 
03) 

345 IF L = THEN POKE 36, PEEK (33): VTAB PEEK (37) - 
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350 IF L < > THEN POKE 36, L - 1 

355 P = PEEK ( - 16384): IF P < > 141 THEN 330 

360 PRINT " "; 

365 IF PEEK (37) = 23' THEN VTAB 23 
370 PRINT 

375 POKE - 16368,0: RETURN 
400 REM 

*** SCREEN FORMATTER «** 

410 1 = LEN (ANS): IF NOT I THEN RETURN 

411 P = PEEK (36): IF C0L80 THEN IF P = PEEK (1147) THEN P - PEEK C14 

412 NOT P THEN IF I > 1 THEN IF ASC (ANS) = 32 THEN ANS = RIGHTS 

A13 i A F N p'' J l\ < PEEK (33) AND AIIE THEN PR-INT ANS;" ";:ANS - RETURN 

414 IF I > 1 THEN IF RIGHTS (ANS,1) = " " THEN ANS = LEFTS CANS,I - 1 

417 IF P + I < PEEK (33) THEN IS = ANS: ANS = "": GOTO 440 

425 I = I P - E 1: < If' i'tHEN 2 'lF = MID$ (ANS, 1,1) < > " " THEN 425 

430 IF I = 1 THEN I = J 

/ti tp T = n THEN PRINT : GOTO 410 

435 IS = LEFTsTaNs'i - 1): IF LEN (ANS) > I THEN ANS = RIGHTS (ANS, LEN 
(ANS) - I) 

440 IF AIIE THEN PRINT IS; ,.„.. = ASC 

445 IF NOT AIIE THEN K = LEN (II) ♦ : FOR I = TO LEN C S . ASC 
( RIGHTS (IS,K - I)): PRINT CHRS (J - 32 * (J > 96 AND J \ts>>, 

447 V- PEEK (36): IF C0L80 THEN IF P = PEEK (1147) THEN P PEEK (14 
450 If' LEN (ANS) THEN IF P < > THEN PRINT 

HI IF pi N >T;h T EN EN IF 10 MIDS (IS, LEN (IS),1, < > " " THEN PRINT " ■■ 

465 RETURN 
500 REM 

*** MENU MAKER *** 

530 J = 0: K = 0:JJ = 0:KK = 0:LL = 0:MM = 0:NN = 0:00 = 0:AN = 
535 00 = OA 
540 ANS = "" 

550 KK = KK + INT ( LEN (MENUS(ID) / (27 + 35 * CC0L80 = 1))) 
555 IF 11 < 12 THEN IF MENUS (II ♦ 1> < > "End" AND MENUS (II ♦ 1) < > 
"end" AND MENUS (II ♦ 1) < > "END" THEN II = II + 1: GOTO 550 

565 NN = 0: IF LL * 2 + KK < 14 THEN NN = 1 

570 MM = 3: IF C0L80 THEN MM = 9 

575 JJ = 3 + MM: IF LL > 9 THEN JJ = 4 + MM 

595 ANS"! T ITLES : GOSUB 400: POKE 36, PEEK (33) - LEN (SUBTITLES) - 1:AN 

S = SUBTITLES 
600 GOSUB 400 

605 FOR II = 1 TO PEEK (33): PRINT "_";: NEXT : PRINT 
615 FOR II = 1 TO LL 

620 HTAB MM: PRINT II;". "; ,„„,, 
625 VTAB PEEK (37): IF C0L80 THEN VTAB PEEK (1531) 
630 POKE 32, JJ: POKE 33, PEEK (33) - JJ: PRINT 
635 ANS = MENUS(II): GOSUB 400 

640 POKE 32,0: POKE 33, PEEK (33) + JJ: PRINT 
645 IF NN THEN PRINT 

655 IF XT PEEK (37) > 16 THEN PRINT "TOO MANY MENU ITEMS OR TOO LONG LINE 
S.": STOP 
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660 TEXT : VTAB 17:ANS = "Select option >": GOSUB 400: PRINT 

665 FOR II = 1 TO PEEK (33): PRINT "_*';: NEXT 

670 IF NOT 00 OR NOT AIIE THEN PRINT 

675 IF LEN (FROMS) THEN AN$ = "For " + FROMS + ": press ESC": GOSUB 400 



6 M> 
68'. 
690 
/OU 
70S 

no 

71!, 

7 20 
723 

725 
735 
740 
745 
750 
755 

7 60 
765 

7 70 
775 
780 
785 
795 
800 
805 
815 
820 

825 
830 
835 
840 
845 

8 50 



860 

870 
875 
S80 



PRINT 

If AIIE THEN PRINT "To erase: use the DELETE key" 
ANS = "To select: type a number from 1 to " + STR$ CLL) 
GOSUB 400: PRINT 
IF NOT 00 THEN 720 

IF AIIE THEN PRINT "For descriptions: press OPEN-APPLE-?" 
IF NOT AIIE THEN PRINT "FOR DESCRIPTIONS: FOLLOW ANSWER WITH ?" 
ANS = "To go to selected item: press RETURN": GOSUB 400: PRINT 
IF NOT 00 THEN ANS = "(There are no descriptions available)": GOSUB 
400 

FL = 3:AN$ = "" 
REM 

VTAB 17: HTAB 17: CALL - 868: HTAB 17 

IF AIIE OR NOT LEN (FROMS) THEN GOSUB 100: GOTO 795 



0:M = 
: IF I 



PEEK (37) :L = 
< THEN K = 1 



PEEK (36):OAKEY 
- K: I = 5: J = 1 - 



J: NORMAL 



'; : POKE 36,L: VTAB M + 1 

16384) : IF P < 128 THEN 755 



= 1 : GOTO 795 
868: VTAB n + 



I = 0:J = 
1 = 1-1 
I NVERSE 
PRINT " 
P = PEEK ( - 
NORMAL 

IF P = 155 THEN POKE - 16368,0: ESCKEY 
L = PEEK (36): VTAB 20: HTAB 1: CALL - 
INPUT "";ANS 
VTAB 19 

IF NOT OAKEY THEN 825 
IF NOT 00 OR OAS < > "?" AND OAS < 
JJ = VAL (ANS) : IF JJ > AND JJ 
IF JJ = THEN PRINT "--> PLEASE SELECT 

- 868: PRINT :AN$ = "": GOTO 735 
IF SAKEY THEN 735 

IF ESCKEY THEN IF LEN (FROMS) THEN 880 

IF JJ > AND J J < = LL THEN II = JJ 
THEN 735 

NOT AIIE AND ( RIGHTS (AN$,1) = "?" 
IF II > AND II < = LL THEN OAKEY 
0: FOR 1=1 TO LEN (ANS):J 
> 32 AND (J < 48 OR J > 57)) 



1 : HTAB L + 1 



> "/" THEN 735 
LL THEN II = JJ : GOTO 880 

A NUMBER FIRST <— ";: CALL 



J J = VAL (ANS): 
IF LEN (ANS) = 
IF 00 THEN IF 
1) = "/") THEN 
IF LEN (ANS) THEN K = 
(AN$,I)):K = K + (J < 



— > PLEASE USE DIGITS <--";: CALL 



FOR : 
: NEXT 
- 868: 



PRINT " 
"": GOTO 735 

IF NOT JJ THEN IF LEN (ANS) THEN K = 0: 
= ASC ( RIGHTS ( ANS, I) ) : K = K + (J = 48) 
— > PLEASE USE DIGITS < — " ; : CALL 

735 

IF JJ > LL THEN PRINT " 
868: PRINT :AN$ = "": GOTO 735 

IF JJ < 1 THEN PRINT " — > IS TOO SMALL < 

NS = "": GOTO 735 
AN = II: TEXT : HOME : RETURN 



OR RIGHTS (ANS, 
= 1: GOTO 880 
= ASC ( RIGHTS 

NEXT I: IF K THEN 
68: PRINT :ANS = 



= 1 TO LEN (ANS): J 
I: IF NOT K THEN PRINT 
PRINT :ANS = "": GOTO 



";JJ.;" IS TOO LARGE <--" 



CALL 



868: A 



1000 REM *** MAIN PROGRAM *** 

1010 I = 0:ANS = "":J = 0:IS = "":K = 0: REM DECLARE MOST OFTEN USED VARI 
ABLES FIRST FOR SPEED . 

1020 GOSUB 63000: REM FIND OUT IF AIIE OR NOT 

1021 DIM MES(20) 

1025 IF RESULTS > = 64 THEN COLRO = 1: PRINT CHR$ (4);"PR#3": REM U A 
N 80-COLUMN CARD IS PRESENT, USE IT. IF YOU DON'T WANT IT, CHANGE" T 
HE LINE TO: 

1025 PRINT CHR$(21) 

1030 IF PEEK (6) = 99 AND PEEK (7) = 99 THEN 1100: REM SEE NOTES FOLL 

OWING 9060 
1035 TEXT : HOME : VTAB 2: PRINT 

1040 ANS = ''*** THE APPLESOFT SAMPLER DISK ***": POKE 36, ( PEEK (33) - LEN 

(ANS)) / 2: GOSUB 400: PRINT 
1045 VTAB 6 + 3 * (C0L80 = 1): REM START ON LINE 6 UNLESS C0L80=1, IN WH 

ICH CASE, START ON LINE 9 
1047 ANS = "Featuring": GOSUB 400 
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1050 ANS = "the collection of program to be stud.ed ,n = ™^° n ^ th 
he Applesoft Tutorial, with a special appearance ^ • G0S0B 400 

1060 ANS = "Postage Rates, the example program from the Applesoft Referen 
ce Manual.": G0SUB 400: PRINT : PRINT „ 

1065 ANS = "The following " + CHRS (34) + "mam menu + CH "/f *i 

iuoj tvij> ^ ru»t (34) + sub-menus + LHKl <. 

ets you select one of several + CHRS 134) * suu 
34) V " with the names of the programs on this disk. : G0SUB 400 

1070 ANS = "Vou can choose to pick a program from a sub-menu, or you can 
elect to end the": G0SUB 400 

1075 ANS = "program. ": G0SUB 400 

1076 G0S0B 400 

^89 AnT= T "P ™r£uRN to go to the Main Menu.": G0SUB 400: G0SUB 300 
1090 REM ** MAIN MENU ** 
1100 REM ** MAIN MENU LOOP ** 

^^^^^^ MENU OR SUBSECTION OF PROGRAM 

S 3) = "Postage Rafes - From The Applesoft Reference , n anua 
1180 MENUSC4) = "End the program (This opt 10 n will type CATALOG for you 

nd will leave you in Applesoft.)" 
1190 MENUS(5) = "END": REM MENU PROGRAM KEEPS DISPLAYING ITEMS UNTIL IT F 

1 195 0AK S Ey T -- E 0: OR REM''HEL'p NOT AVAILABLE; OPEN-APPLE KEY WILL NOT BE READ 
1197 FR0MS = "" 
1200 G0SUB 500 
1215 ANS = "" 

1230 0N A AN 8 G0SUB 2000,3000,4000,6000: REM RETURN PRESSED, SO 60 TO THE S 

ELECTED SECTION 
1240 GOTO 1100 
1250 REM 

1999 REM BLANK LINES ARE DONE BY PRESSING THE DOWN-ARROW KEY 



2000 REM *** EXAMPLES *** 
2010 REM 

2020 TITLES = "Applesoft Tutorial" 
2030 SUBTITLES = "Examples" 
2040 MENUS ( 1 ) = "COLORLOOP" 

2045 MENUS(2) = "HUE" 

2046 MENU$(3) = "QUILT" 

2047 MENUS(4) = "SPACES" 

2048 MENUS(5) = "COLORBOUNCE" 

2049 MENU$(6) = "RANDOM" 

2050 MEN0S(7) = "HORSES" 

2051 MENUS(8) = "MOIRE" 
2100 MENUS(9) = "ALPHABET" 
2110 MENUS(IO) = "DECIMAL" 

2120 MENUS(H) = "COLORBOUNCESOUND" 
2140 MENUSC12) = "Return to Main Menu" 

2160 FROMS = "Main Menu" : ANS = " :0AKEY = 0: GOSUB 500 
2170 IF ESCKEY THEN RETURN 

2 1 190 TITLES I MEN T U H S( N AN): E REM N STORE NAME OF SELECTION FOR USE BY EACH ROUT 
INE 

2195 PRINT CHRS (21) 
2200 GOTO 9000 
2210 GOTO 2000 
2220 REM 

3000 REM TUTOR EXAMPLES *** 
3010 REM 



Annexe E 



3020 TITLES = "Applesoft Tutorial" 

3030 SUBTITLES = "Samples" * 
3040 MENUSC 1 ) = "SCRAMBLER" 
3050 MENU$(2) = "MAGIC MENU" 

3060 MENU$(3) = "DISK MENU (Which is this very program — selecting it wi 

11 only result in a long wait followed by the program starting over. 
It is included here because it is included in Appendix E.)" 
3070 IF NOT COL80 THEN MENU$(2) = MENU$(2) + CHRS (10): MENUS (3) = MENU 

1(3) + CHRS (10): REM CHRSdO) IS DOWN-ARROW : ADDING DOWN-ARROWS WI 

LL ADD SPACES ABOVE AND BELOW MENU OPTION 3 
3080 REM IN 50 COLUMN MODE, THERE IS ENOUGH ROOM THAT THE MENU MAKER ROU 

TINE WILL ADD SPACES AUTOMATICALLY, SO WE DO IT ONLY IF THE COMPUTER 
IS NOT IN 80-COLUMN MODE 
3090 MENU$(4) = "CONVERTER" 
3100 MENUS(5) = "Return to Main Menu" 
3110 MENUS(6) = "end" 

3120 FROMS = "Main Menu" : ANS = "" : OAKEY = 0: GOSUB 500 
3130 IF ESCKEY THEN RETURN 
3140 IF AN = 5 THEN RETURN 

3150 IF AN = 1 AND NOT AIIE THEN HOME : VTAB 10: PRINT "SORRY, SCRAMBL 
ER CAN ONLY BE": PRINT "PLAYED ON AN APPLE HE.": VTAB 24: PRINT "PR 
ESS RETURN TO GO BACK TO THE MENU."; : GOSUB 300: GOTO 3000: REM "pa 
tch" 

3160 TITLES = MENUS(AN) : REM STORE NAME OF SELECTION FOR USE BY EACH ROUT 
INE 

3165 IF AN = 2 THEN TITLES = "MAGIC MENU": REM A DOWN-ARROW MAY HAVE BEE 

N APPENDED IN LINE 3070 
3170 IF AN = 3 THEN TITLES = "DISK MENU": REM A "PATCH" TO THE PROGRAM: 

MENUS(3) HAS AN EXTRA DESCRIPTION 
3180 GOTO 9000 
3190 REM 

4000 REM *** REFERENCE MAN *** 
4010 REM 

4020 TITLES = "Applesoft Tutorial" 
4030 SUBTITLES = "Example" 
4040 MENUSd) = "POSTAGE RATES" 
4060 MENUSC2) = "Return to Main Menu" 
4070 MENUS(3) = "end" 

4080 FROMS = "Main Menu" : ANS = "":0AKEY = 0: GOSUB 500 
4090 IF ESCKEY THEN RETURN 
4100 IF AN = 2 THEN RETURN 

4110 TITLES = MENUS ( AN) : REM STORE NAME OF SELECTION FOR USE BY EACH ROUT 





INE 




4120 


GOTO 9000 




4140 


REM 




5999 


RETURN 




6000 


REM *** CATALOG *** 




6010 


HOME 




6020 


VTAB 10 




6025 


PRINT "]"; 




6030 


TITLES = "CATALOG" 




6040 


FOR I = 1 TO LEN (TITLES) 




6050 


PRINT MIDS (TITLES, I, 1 ); 




6055 


K = PEEK ( - 16336) + PEEK 


( - 16336) 


6060 


FOR J = 1 TO 400 * RND (1) : 


NEXT 


6070 


NEXT I 




6072 


POKE 6,0: POKE 7,0: REM SEE 


NOTES FOLLOWING 9060 


6075 


PRINT 




6080 


PRINT CHRS (4);TITLES 




6999 


END 
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POKeTw- PO^T^REM LET THE PROGRAMS FROM APPENDIX E KNOW THA 
T THEY CAN RETURN TO THIS PROGRAM. USUALLY, YOU USE A VARIABLE TO 

7 ARE NOT AFFECTED BY APPLESOFT, SO THE AUTHOR CHOSE THEM AS A WAY T 
COMMUNICATE 
PRINT 

PRINT CHRS (4>;"RUN " ; T I T L E $ 
END 

REM «** COMPUTER ID *** 
REM *** AIIE OR NOT? *** 

REM USES I,J,K,RE - SETS AIIE TO 1 IF IT IS AN AIIE 
OEM SFTS RESULT DEPENDENT ON AVAILABLE HARDWARE 

L Of MEANS NOT A / / E ; « MEANS A//E BUT NO 80 COLUMNS; 
64 MEANS A//E WITH 80 COLUMNS BUT NO AUX MEM; 128 MEANS A//E WITH A 

63050 UX DATA 8, 120, 173, 0, 224, 141, 208 2 173 0, 208 14; I 209 2 

173, 0, 212, 141, 210, 2, 173, 0, 216, 141, 211, 2, 173, 129, 192, 1 

73 129 192, 173, 179, 251, 201, 6, 208, 73, 173 

6 3060 73 'DAT 2 A 9 '23, 192, 48, 60, 173, 19, 192, 48,., 173, 22,^^48, 34, 



9000 
9060 



9061 



9075 
9080 
9090 
63000 
6 3010 
63020 
6 3030 
63040 



169, 128, 141, 207, 3, 76, 
169, 32, 141, 207, 3, 76, 7 



160, 42, 190, 162, 3, 185, 0, 0, 150, 0, 

, 76, 1, 0, 8, 160, 42, 185, 162, 3, 153 

63070 DATA 0, 0, 136, 208, 247, 104, 176, " 

73, 3, 169, 64, 141, 207, 3, 76, 73, 3, 

63O80 3 'D 3 A;A 1 1o5°'2jr,'2f 7 208:'2:i 3 W°3; 0^208 205 209 2 208 16 173 
, 0, 212, 205, 210, 2, 208, 8, 173, 0, 216, 205, 211, 2, 240, 56, 17 
3 136, 192, 173, 0, 224, 205, 208, 2, 240, 6 
63090 'DATA' 173 128', 192, 76, 161, 3, 173, . 208 205 209 2 240 6 
173, 128, 192, 76, 161, 3, 173, 0, 212, 205, 210, 2, 240, 6, 173, 1 
28,192,76,161,3,173,0,216,205,211,2 
63100 DATA 24U, 3, 173, 128, 192, 40, 96, 169 238, 41, 5 192, 141, 3 
, 192, 141, 0, 8, 173, 0, 12, 201, 238, 208, 14, 14, 0, 12, 173, 0, 
8, 205, 0, 12, 208, 3, 56, 176, 1, 24 

DATA 141, 4, 192, 141, 2, 192, 76, 29, 3, 234 
J = 975:K = 724 
FOR I = TO 249 
READ L 

I/L 



63110 
63120 
63130 
63140 
63150 
63160 
63170 



POKE K 
NEXT 
CALL K 



63180 RESULTS = PEEK (J) 

63190 IF RESULTS < > THEN AIIE 

63200 RETURN 
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CONVt'RTBR 



CONVERTER est un programme en lui meme qui est base sur 
I'ensemble des sous programmes maintenant familiers. II est derive 
de MAGIC MENU, et permet I'adjonction de differentes conversions 
qui peuvent vous etre utiles. II peut vous fournir I'experience de 
programmation la plus valable : fonctionnement intime avec un 
programme ecrit par des experts. 

Quand vous faites des adjonctions a CONVERTER, utilisez le programme 
RENUMBER. De nombreuses conversions sont faites de la meme 
maniere : seul le texte change. Recopiez les lignes et changer les mots. 

La ligne 11145 est particuliere : c'est un exemple de la sorte de 
precaution qu'il faut prendre en programmation. La creation de 
programmes conviviaux qui ne font jamais de fautes ou n'apparaissent 
pas insenses aux utilisateurs est un challenge difficile mais existant. 



Programme 

REM CONVERTER - SEPT, 1982 - BG 8 TOG 

1 GOTO 2000 

2 TEXT : PRINT CHRS (21): HOME : POKE 33,33: END 
100 REM 

*** INPUT ROUTINE *** 

140 I = 5:J = 0:K = 0:L = 0:M = 0:1$ = "":ESC = 0:OA = 0:0A$ = "":SA = 0: 

SA$ = "": IF FL = THEN FL = 245 
142 IF NOT AIIE THEN INPUT "";AN$: RETURN 
145 PRINT AN$;:J = LEN C AN$ ) 
149 M = PEEK (37) 

153 L = PEEK (36): IF C0L80 THEN IF L = PEEK (1147) THEN L = PEEK (14 
03) 

155 PRINT " ";I$;" "; 

160 N = 1: IF L + LEN (1$) > = PEEK (33) - 3 AND PEEK (37) = PEEK (3 

5) - 1 THEN N = 
165 POKE 36, L : POKE 1403, L: VTAB M + 1 

170 I = I - 1: IF I < THEN K = 1 - K:I = 5:"PRINT CHRS (32 + 63 * K); 

175 POKE 36, L: POKE 1403, L: VTAB M + 1 

180 P = PEEK ( - 16384): IF P < 128 THEN 170 



185 


IF PEEK ( - 16287) > 127 THEN OAKEY = 


1 






• v. 


IF PEEK ( - 16286) > 127 THEN SAKEY = 


1 






195 


POKE - 16368, 0:K =0:1=0 








200 


IF OAKEY THEN OAS = CHRS (P - 128):ANS 


= ANS + IS: 


PRINT IS;" 


": RETURN 


205 


IF SAKEY THEN SAS = CHRS (P - 128):AN$ 


= ANS + IS: 


PRINT IS;" 


": RETURN 


210 


IF P > 159 AND P < > 255 THEN IF J + 


LEN (IS) < 


FL THEN IF 


N THEN 




ANS = ANS + CHRS (P - 128) :J = J + 1: 


PRINT CHRS 


(P) ; : GOTO 1 


49 


215 


IF P < > 255 THEN 240 








220 


IF J THEN PRINT " ";: POKE 36, L: VTAB 


M + 1 : PRINT 


CHRS (136) 


; : J = 


225 


J - 1 

IF J = THEN ANS = "" 








230 


IF J THEN ANS = LEFTS (ANS, J) 








235 


GOTO 149 
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240 IF P < > 136 THEN 265 

245 IF J THEN PRINT " ";: POKE 36,L: VTAB M + 

RIGHTS (AN$,1) + I$:J = J - 1 

250 IF J = THEN ANS = "" 

255 IF J THEN AN$ = LEFTS CANS, J ) 

260 GOTO 149 

265 if p = 141 THEN ANS = ANS + IS 

270 IF P < > 149 THEN 294 

275 IF NOT LEN ( IS) THEN 149 

280 ANS = ANS + LEFTS (IS,1):J = J 

285 IF LEN (IS) = 1 THEN IS = "" 

290 IF LEN (IS) THEN IS = RIGHTS (IS, LEN (IS) 

292 GOTO 149 

294 IF P = 155 THEN ESCKEY = 

296 GOTO 149 

300 REM 



1: PRINT CHRS (136); : IS = 



PRINT IS;" ": RETURN 



1: PRINT LEFTS (IS,1); 



1 ) 



1: PRINT : RETURN 



** GET RETURN ** 



310 IF AIIE THEN 325 

315 GET ANS: IF ASC (ANS) < > 13 THEN 315 
320 PRINT : RETURN 

330 I = I - 1: IF I < THEN K = 1 - K:I = 5: PRINT CHRS (32 + 63 * K) ; 
335 IF I < > 5 THEN 355 

340 L = PEEK (36): IF COL80 THEN IF L = PEEK (1147) THEN L = PEEK (14 
03) 

345 IF L = THEN POKE 36, PEEK (33): VTAB PEEK (37) 

350 IF L < > THEN POKE 36, L - 1 

355 P = PEEK ( - 16384): IF P < > 141 THEN 330 

360 PRINT " "; 

365 IF PEEK (37) = 23 THEN VTAB 23 
370 PRINT 

375 POKE - 16368,0: RETURN 
400 REM 

*** SCREEN FORMATTER *** 



410 I = LEN (ANS): IF NOT I THEN RETURN 

411 P = PEEK (36): IF C0L80 THEN IF P = PEEK (1147) THEN P = PEEK (14 

412 ff NOT P THEN IF I > 1 THEN IF ASC (ANS) = 32 THEN ANS = RIGHTS 

413 [Tp'l 2 Vl < PEEK (33) AND AIIE THEN PRINT ANS;" ";:ANS = "": RETURN 

414 IF I > 1 THEN IF RIGHTS (ANS,1) = " " THEN ANS = LEFTS (ANS, I - 1 

417 IF P + I < PEEK (33) THEN 1$ = ANS : ANS = "": GOTO 440 
420 J = PEEK (33) - P + 2:1 = J 

425 I = I - 1: IF I THEN IF MID$ (ANS, 1,1 ) < > " " THEN 425 

430 IF I = 1 THEN I = J 

431 IF I = THEN PRINT : GOTO 410 

435 IS = LEFTS (ANS, I - 1): IF LEN (ANS) > I THEN ANS = RIGHTS (ANS, LEN 

(ANS) - I) 
440 IF AIIE THEN PRINT IS; 

445 IF NOT AIIE THEN K = LEN (IS) + 1: FOR I = 1 TO LEN ( IS) : J = ASC 

( RIGHTS CIS,K - I)): PRINT CHRS (J - 32 * (J > 96 AND J < 123));: NEXT 

447 p'= PEEK (36): IF COL80 THEN IF P = PEEK (1147) THEN P PEEK (14 
03) 

450 IF LEN (ANS) THEN IF P < > THEN PRINT 

455 IF LEN (ANS) THEN 410 „ „ 

460 IF P < > THEN IF MIDS ( IS, LEN ( IS ) ,1 ) < > THEN PRINT 



465 RETURN 
500 REM 



*** MENU MAKER *** 
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530 J = 0: K = 0:JJ = 0:KK = 0:LL = 0:MM = 0:NN = 0:00 = 0:AN = 0. 
535 00 = OA 
540 AN$ = "" 
545 II = 1 

550 KK = KK + INT ( LEN (MENUS(ID) / (27 + 35 * CC0L80 = 1))) 

555 IF II < 12 THEN IF MENUS (II + 1) < > "End" AND MENUS (II + 1) < > 

"end" AND MENUS (II + 1) < > "END" THEN II = II + 1: GOTO 550 
560 LL = II 

565 NN = 0: IF LL * 2 + KK < 14 THEN NN = 1 
570 MM = 3 : IF C0L80 THEN MM = 9 
575 JJ = 3 + MM: IF LL > 9 THEN JJ = 4 + MM 
590 TEXT : HOME 

595 ANS = TITLES: GOSUB 400: POKE 36, PEEK (33) - LEN (SUBTITLES) - 1:AN 

S = SUBTITLES 
600 GOSUB 400 

605 FOR II = 1 TO PEEK (33): PRINT "_";: NEXT : PRINT 

615 FOR II = 1 TO LL 

620 HTAB MM: PRINT II;". "; 

625 VTAB PEEK (37): IF C0L80 THEN VTAB PEEK (1531) 
630 POKE 32, JJ: POKE 33, PEEK (33) - JJ : PRINT 
635 ANS = MENUSCID: GOSUB 400 

640 POKE 32,0: POKE 33, PEEK C33) + JJ: PRINT 
645 IF NN THEN PRINT 
650 NEXT II 

655 IF PEEK (37) > 16 THEN PRINT "TOO MANY MENU ITEMS OR TOO LONG LINE 
S.": STOP 

660 TEXT : VTAB 17:ANS = "Select option >": GOSUB 400: PRINT 
665 FOR II = 1 TO PEEK (33): PRINT "_";: NEXT 
670 IF NOT 00 OR NOT AIIE THEN PRINT 

675 IF LEN (FROMS) THEN ANS = "For " + FROMS + ": press ESC": GOSUB 400 



680 
685 



705 
710 
715 
720 ANS 

723 IF 



PRINT 

IF AIIE THEN PRINT "To erase: use the DELETE key" 
690 ANS = "To select: type a number from 1 to " + STRS (LL) 
700 GOSUB 400: PRINT 

IF NOT 00 THEN 720 

IF AIIE THEN PRINT "For descriptions: press OPEN-APPLE-?" 
IF NOT AIIE THEN PRINT "FOR DESCRIPTIONS: FOLLOW ANSWER WITH ?" 
= "To go to selected item: press RETURN" : GOSUB 400: PRINT 
NOT 00 THEN ANS = "(There are no descriptions available)": GOSUB 

400 

FL = 3: ANS = "" 
REM 

VTAB 17: HTAB 17: CALL - 868: HTAB 17 

IF AIIE OR NOT LEN (FROMS) THEN GOSUB 100: GOTO 795 



725 
735 
740 
7«S 
750 
755 



0:M 

IF 



760 
765 
770 
775 
780 
785 
795 
800 
805 



835 JJ 
840 
845 



PEEK C37):L = PEEK (36):0AKEY = 
< THEN K = 1 - K:I = 5:J = 1 - 

POKE 36, L : VTAB M + 1 
- 16384) : IF P < 128 THEN 755 



NORMAL : IF J THEN 



1 : GOTO 795 
868: VTAB M + 



1 : HTAB L 



1 



I = 0:J 
I = I - 1 : 
INVERSE 
PRINT " ";: 
P = PEEK ( 
NORMAL 

IF P = 155 THEN POKE - 1 6368,0 : ESCKEY 
L = PEEK (36): VTAB 20: HTAB 1: CALL 
INPUT "";ANS 
VTAB 19 

IF NOT OAKEY THEN 825 

IF NOT 00 OR OAS < > "?" AND OAS < > "/" THEN 735 
815 JJ = VAL (ANS): IF JJ > AND JJ < = LL THEN II = JJ: GOTO 880 
820 IF JJ = THEN PRINT "— > PLEASE SELECT A NUMBER FIRST <--";: CALL 

- 868: PRINT :AN$ = "": GOTO 735 
825 IF SAKEY THEN 735 

830 IF ESCKEY THEN IF LEN (FROMS) THEN 880 

IF JJ > AND JJ < = LL THEN II = JJ 
THEN 735 

NOT AIIE AND ( RIGHTS (ANS,1) = "?" OR RIGHTS (ANS, 
IF II > AND II < = LL THEN OAKEY = 1: GOTO 880 

1 TO LEN (ANS): J = ASC ( RIGHTS 

48 OR J > 57)): NEXT I: IF K THEN 
C — ";: CALL - 868: PRINT : ANS = 



VAL (ANS): 



8 50 



IF LEN (ANS) = 
IF 00 THEN IF 
1) = "/") THEN 

IF LEN (ANS) THEN K = 0: FOR I 
(AN$,I)):K = K + (J < > 32 AND (J < 
PRINT " — > PLEASE USE DIGITS 



GOTO 735 



Converter 
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860 IF 



NOT JJ THEN If LEN CANS) THEN K 
ASC C RIGHTS CANS,I)):K = K + CJ 



0: 

48) 



FOR 1=1 TO 
NEXT I: IF 



LEN CANS) : J 
NOT K THEN PRINT 



CALL - 868: PRINT :ANS = 



GOTO 



870 

875 

880 
1000 
1010 
1100 
1110 
1120 
1130 
1135 
1U0 
1145 



";JJ;" IS TOO LARGE <— 



CALL 



; : CALL - 
868: A 



-> PLEASE -USE DIGITS <~" 

735 

IF J J > LL THEN PRINT " ~> 
868: PRINT :ANS = "": GOTO 735 

IF JJ < 1 THEN PRINT " ~ > IS TOO SMALL < 

N$ = "": GOTO 735 
AN = II: TEXT : HOME : RETURN 
REM *** SUBROUTINES *** 

REM SOME SPECIAL ROUTINES FOR THIS PROGRAM 
REM Y OR N? 

RE?" PUT NAME OF CALLING ROUTINE IN ANS 

REM UPON RETURN, AN WILL BE 1 IF YES, IF NO 

REM USES AN, ANS, I, IIS 

IIS = "Do you want to do another " + ANS + " conversion? (V OR N) " 
HTAB 1: VTAB 22: CALL - 958-.ANS = IIS: GOSUB 400: FL = 2: GOSUB 100 



1150 1=0: IF LEN CANS) THEN I 
< > ASC C"y") AND I < > 
45 

1155 IF 



= ASC CANS): IF I < 
ASC C"N") AND I < > 



> ASC C"Y") AND I 
ASC C"n") THEN 11 



NOT I THEN 1145 
1160 AN = 0: IF I = ASC C"y") OR 
1170 
2000 



2010 

2020 
2025 



I = ASC C"Y") THEN AN = 1 

RETURN 

REM *** BEGIN PROGRAM *** ,„ r „ c ,,T rnuwcoc 

REM THE CONVERTER - A PROGRAM SKELETON USED FOR MEASUREMENT CONVERS 

'gOSUB 63000: REM SET AIIE TO TRUE CD OR FALSE CO) 

IF RESULTS > = 64 THEN C0L80 = 1: PRINT CHRS C4);"PR#3 : REM IF A 
N 80-COLUMN CARD IS PRESENT, USE IT. IF YOU DON'T WANT IT, CHANGE T 
HE LINE TO: 

1025 PRINT CHRS C 21 ) 



2030 
2040 
2050 
2070 

2080 
2090 
2095 
2100 
2110 
2120 

2130 

2140 

2150 

2160 

2220 
2230 
2240 
2250 
2260 



LEN CANS)) / 2: GOSUB 



TEXT : PRINT : HOME 
I = 0:ANS = "":J = 0:IS = "":K = 

DIM MENUSC1 2) 
AN $ = "*** Converter ***": POKE 36, C PEEK C33) - 
400: PRINT : REM CENTER TITLE 

PRINT : PRINT : IF COL80 THEN VTAB 6 
ANS = "Converter is a program to convert" 

GOSUB 400 „ rnc ,. n /nn 

ANS = "measurements from one form to another: GOSUB 
ANS = "such as kilometers to miles.": GOSUB 400: PRINT : PRINT 
ANS = "The program is structured to provide hundreds of converses, 

but it is now in skeleton form": GOSUB 400 

ANS = "— that is, only a few sample conversions are provided. The 

intent": GOSUB 400 , ■ ,. ■ 

ANS = "is for you to learn, through studying the program listings an 

d the given samples, how to alter the program": GOSUB 400 

ANS = "to provide you the conversions you will find useful. : GOSUB 

^ -Through"!^ learning process, you will gain insight into alt 
ering other programs to suit your needs.": GOSUB 400 
PRINT 

AN$ A = "Press RETURN to continue.": GOSUB 400: GOSUB 300 
HOME 
REM 



2270 REM *** MAIN MENU *** 

??an TiTi FS = "Converter":SUBTITLE$ = "Main Menu" 

??«5 FROM* - 1 EK (6) = 99 AND PEEK C7) = 99 THEN FROMS = "the D 

isk Menu": ' REM SEE NOTES FOLLOWING LINE 9060 IN THE D!SK MENU PROGRAM 
2290 MENUS CD = "LINEAR MEASURES" 



2300 MENUS C2) 
2310 MENUSC3) 
2320 MEN0IC4/ 
2330 MENUSC5) 
2340 MENUSC6) 



"TEMPERATURE MEASURES" 
"SPEED MEASURES" 



274 
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2350 MENUSC7) = "" 

2360 MENUSC8) = "" 

2370 MENUS C9) = "" 

2380 MENUSC 1 0) = "" 

2390 MENUSC11) = "" 

2400 MENUS C 1 2) = "End the program" 

2405 IF LEN C FROMS) THEN MENUSC1 2) = "End program and go to Disk Menu" 

2410 REM 

2430 ANS = "" 

2440 OAKEY = 0: REM NO HELP AVAILABLE 
2450 GOSUB 500: REM DO MENU 

2455 IF ESCKEY THEN GOTO 22000: REM SEE NOTES FOLLOWING LINE 9060 IN TH 

E DISK MENU PROGRAM 
2-460 ON AN GOSUB 11000,12000,13020,14000,15000,16000,17000,18000,19000,2 

0000,21000,22000 
2470 GOTO 2270 

10999 REM 

11000 REM *** LINEAR MEASURE 

11001 REM 

11002 TITLES = "Conversions" 

11005 SUBTITLES = "Change linear measure" 
11010 ME NUS C 1 ) = "Kilometers to Miles" 
11020 MENUS C 2) = "Miles to Kilometers" 
11030 MENUSC3) = "Return to Main Menu" 
11035 MENUSC4) = "end" 

11040 FROMS = "Main Menu" : ANS = "":0AKEY = 0: GOSUB 500 
11050 IF ESCKEY THEN RETURN 
11060 IF AN = 3 THEN RETURN 

1 1065 TITLES = MENUS CAN): REM STORE NAME OF SELECTION FOR USE BY EACH ROU 
TINE 

11070 ON AN GOSUB 11100,11200 
11080 GOTO 11000 

11099 REM 

11100 REM ** KILOMETERS — > MILES 

11110 TEXT : HOME : PRINT :AN$ = "Convert Kilometers to Miles": GOSUB' 40 

0: PRINT : REM FUNCTION TITLE 
11120 VTAB 10:AN$ = "Enter number of kilometers ": GOSUB 400:AN$ = "":FL 
= 10: GOSUB 100 

11130 AN = VAL CANS): IF AN = AND ANS < > "0" THEN PRINT CHRS C7) : GOTO 

11110: REM ONLY NUMBERS ALLOWED 
11140 MILE = AN * .62137 

11145 IS = " mile": IF INT CMILE * 10000) / 10000 < > 1 THEN IS = " mi I 
es" 

11146 J$ = " kilometer": IF AN < > 1 THEN JS = " kilometers 

11150 PRINT :ANS = STRS CAN) + JS + " = " + STRS CMILE) + IS: GOSUB 40 


11160 ANS = TITLES: GOSUB 1100 
11170 IF AN THEN 11100 
11190 RETURN 
11199 REM 



11200 REM ** MILES — > KILOMETERS 

11210 TEXT : HOME : PRINT :AN$ = "Convert Miles to Kilometers": GOSUB 40 

0: PRINT : REM FUNCTION TITLE 
11220 VTAB 10:ANS = "Enter number of miles ": GOSUB 400:ANS = "" : FL = 10 

: GOSUB 100 

11230 AN = VAL CANS): IF AN = AND ANS < > "0" THEN PRINT CHRS C7) : GOTO 

11210: REM ONLY NUMBERS ALLOWED 
11240 KILO = AN / .62137 

11245 IS = " mile": IF AN < > 1 THEN IS = " miles" 

11246 JS = " kilometer": IF INT CKILO * 10000) / 10000 < > 1 THEN JS = 
" ki lometers" 

11250 PRINT :ANS = STRS CAN) + IS + " = " + STRS (KILO) + JS: GOSUB 40 


11260 ANS = TITLES: GOSUB 1100 
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11270 IF AN THEN 11200 
11280 RETURN 
11290 REM 

11300 RETURN : REM PROGRAMMER TO CREATE CONVERSION ROUTINE HERE 
12000 REM *** I EMPERATURE *** 
12010 REM 

12070 TITLES = "Conversions" 
12030 SUBTITLES = "Change temperature measure 
12040 MENUS CD = "Fahrenheit to Celsius 
12050 MENUS C 2) = "Celsius to Fahrenheit 
12060 MENUSC3) = "Return to Main Menu 

12070 MENUSC4) = "end" 500 

12080 FROMS = "Main Menu : ANS - . OAKfcY 
12090 IF ESCKEY THEN RETURN 

]IZ TITLES MENUs'c AN) ^ REM STORE NAME OF SELECT ION FOR USE BY EACH ROU 
TINE 

12120 ON AN GOSUB 12200,12400 
12130 GOTO 12000 
12140 REM 

12200 REM ** FAHRENHEIT -> CELSIUS Fahrenhe it to Celsius": GOSUB 

12210 TEXT : HOME : PRINT :AN$ = "Convert Fahrenheit 

400: PRINT : REM FUNCTION T "LE N$ „ „„ :FL = 

12220 VTA8 10: ANS = "Enter degrees Fahrenheit 

10: GOSUB 100 „ n „ THFN print CHRS C7) : GOTO 

12230 AN = VAL CANS): IF AN = AND ANS < > THEN 

12210- REM ONLY NUMBERS ALLOWED ,..„, PJ ture 

nli*:^™. IF^ * INT CCEL * 10000, / 10000 < > 1 THEN IS - " de 

1 22 60 9 7s eS =" ; degree": IF AN < > 1 THEN « - "^r ...» + ^ ^ + „ 
12270 PRINT :AN$ = STRS ian." t 

+ " Celsius": GOSUB 400 
12280 ANS = TITLES: GOSUB 1100 
12290 IF AN THEN 12200 
12300 RETURN 
12310 REM 



\\Z TE*" HOME 1 : 5 P^l-Convert Celsius to Fahrenheit": GOSUB 
12420 4 °^AB^olANS R r..^^ i :g:^ E Celsius": GOSUB 400:ANS - "":FL . 10: 

GOSUB 100 > „ .. jhEN PRINT CHRS C7) : GOTO 

12430 AN = VAL CANS): IF AN = AND ANS < 

12410: REM ONLY NUMBERS ALLOWED a temperat ure 

d\J?i,,l"'°>-™> " sus m: 60,0 ,! "° 

!5S T. \ ;;"«„; ,u,rj; : issrr » - » — 

1 2460 JS = degree : IF ini lr »™ 

egreeS " „„, + " Celsius = " + STRS CFAHR) + JS + 

12470 PRINT :ANS = STRS CAN) + IS + Celsius 

" Fahrenheit": GOSUB 400 
12480 ANS = TITLES: GOSUB 1100 
12490 IF AN THEN 12400 
12500 RETURN 
12510 REM 

12600 RETURN : REM PROGRAMMER TO CREATE KELVIN CONVERSION ROUTINE HERE 
13000 REM *** SPEED *** 
13010 REM 
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13020 TITLES = "Conversions" 

13030 SUBTITLES = "Change speed measure" 

13040 MENU$(1) = "Kilometers/hour to mi Les/hour" 

13050 MENUS(2) = "Mi Les/hour to kilometers/hour 

13060 MENUSC3) = "Return to Main Menu" 

13070 MENUSC4) = "end" 

13080 FROMS = "Main Menu" : ANS = "" : OAKE Y = 0: GOSUB 500 
13090 IF ESCKEY THEN RETURN 
13100 IF AN = 3 THEN RETURN 

13110 TITLES = MENUSCAN) : REM STORE NAME OF SELECTION FOR USE BY EACH R0U 
TINE 

13120 ON AN GOSUB 13200,13400 
13130 GOTO 13000 
13140 REM 



13200 REM ** KILO/HR — > MILES/HR 

13210 TEXT : HOME : PRINT :ANS = "Convert Kilometers per hour to Miles p 

er hour": GOSUB 400: PRINT : REM FUNCTION TITLE 
13220 VTAB 10:ANS = "Enter kilometers per hour ": GOSUB 400:AN$ = "":FL = 

10: GOSUB 100 

13230 AN = VAL CANS) : IF AN = AND ANS < > "0" THEN PRINT CHR$ (7): GOTO 

13210: REM ONLY NUMBERS ALLOWED 
1 3240 MILE = AN * .62137 

13250 IS = " mile": IF INT (MILE * 10000) / 10000 < > 1 THEN 1$ = " mi I 
es" 

13260 J$ = " kilometer": IF AN < > 1 THEN J$ = " kilometers 

13270 PRINT :ANS = STRS CAN) + JS + " per hour = " + STRS (MILE) + 1$ + 

" per hour": GOSUB 400 
13280 ANS = TITLES: GOSUB 1100 
13290 IF AN THEN 13200 
13300 RETURN 
13310 REM 



13400 REM ** MILES / HR --> KILO/HR 

13410 TEXT : HOME : PRINT : ANS = "Convert Miles per hour to kilometers p 

er hour": GOSUB 400: PRINT : REM FUNCTION TITLE 
13420 VTAB 10:ANS = "Enter number of mph ": GOSUB 400:ANS = "" : FL = 10: GOSUB 

100 

13430 AN = VAL CANS): IF AN = AND ANS < > "0" THEN PRINT CHR$ (7): GOTO 

13410: REM ONLY NUMBERS ALLOWED 
13440 KILO = AN / .62137 

13450 IS = " mile": IF AN < > 1 THEN IS = " miles" 

13460 JS = " kilometer": IF INT (KILO * 10000) / 10000 < > 1 THEN JS = 
" ki lometers" 

13470 PRINT :AN$ = STRS CAN) + IS + " per hour = " + STRS (KILO) + J S + 

" per hour": GOSUB 400 
13480 ANS = TITLES: GOSUB 1100 
13490 IF AN THEN 13400 
13500 RETURN 
13600 REM 



13601 RETURN : REM PROGRAMMER TO CREATE CONVERSION ROUTINE HERE 

14000 REM *** SELECTION 4 *** 

14999 RETURN 

15000 REM *** SELECTION 5 *** 

15999 RETURN 

16000 REM *** SELECTION 6 *** 

16999 RETURN 

17000 REM *** SELECTION 7 *** 

17999 RETURN 

18000 REM *** SELECTION 8 *** 

18999 RETURN 

19000 REM *** SELECTION 9 *** 

19999 RETURN 

20000 REM-*** SELECTION 10 *** 

20999 RETURN 

21000 REM *** SELECTION 11 *** 
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21999 RETURN 

22000 REM *** SELECTION 12 *** 
22010 REM *** END THE PROGRAM *** 

;"RUN HELLO": END 
22050 TEXT : HOME : TEXT : END 
63000 REM *** COMPUTER ID *** 
63010 REM *** AIIE OR NOT? *** 

""'» r«s «™?^ is-» "« "« «"= * 

160, 42, 190, 162, 3, 185, 0, 0, 150, 0, 153, 162, 5, 136, 

8, 205, 0, 12, 208, 3, 56, 176, 1, 24 
63110 DATA 141, 4, 192, 141, 2, 192, 76, 29, 3, 234 
63120 J = 975:K = 724 
6313U FOR I = TO 249 
63140 READ L 
63150 POKE K + I,L 
63160 NEXT 
63170 CALL K 
63180 RESULTS = PEEK (J) 
63190 IF RESULTS < > THEN AIIE = 1 
63200 RETURN 
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Quelques Idees 

Nous esperons que vous avez pris plaisir a explorer la 
"profondeur" de grands programmes. Si vous vous sentez un peu 
deborde, reposez-vous. Vous avez acquis une enorme quantite 
d'informations nouvelles dans I'espace de quelques heures. 
Examinez ces programmes a nouveau dans un delai de quelques 
jours ou d'une semaine. Regardez les programmes ecrits par 
d'autres auteurs. Chaque fois que vous le ferez, vous decouvrirez 
une nouvelle astuce ou technique que vous pouvez incorporer dans 
vos propres programmes. 



Quelques idees 
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adresse : Nombre utilise pour identifier quelque chose, par exemple 
un emplacement dans la memoire de I'ordinateur. 

affichage : (1) Information accessible visuellement, specialement 
sur un ecran ou un appareillage d'affichage. (2) Le fait de rendre 
accessible I'information visuellement. (3) Un appareil d'affichage. 

algorithme : Procedure sequentielle pou resoudre un probleme ou 
1'accomplissement d'une tache. 

amorce (boot) : Sert a initialiser un ordinateur en chargeant un 
programme dans sa memoire a partir d'une memoire externe, un 
disque par exemple. Est souvent realise en deux temps, d'abord en 
chargeant un petit programme dont I'utilite est de charger un 
programme beaucoup plus etendu. On dit alors que ce 
programme est « auto-chargeable » car il se charge lui-meme en 
memoire a partir de sa propre amorce. 

annuaire : Liste ou repertoire des fichiers stockes dans un disque, 
souvent appele catalogue. 

appel : Sert a demander I'execution d'un sous-programme ou d'une 
fonction. 

Apple lie : Ordinateur Personnel de la famille Apple II, fabrique et 
vendu par Apple Computer, Inc. 

Applesoft : Version etendue du langage de programmation BASIC 
utilise avec I'ordinateur Apple He et capable de traiter des nombres 
en virgule flottante. Un interpreter qui permet de creer et executer 
des programmes en Applesoft est resident en memoire morte dans 
I'Apple lie. Voir BASIC entier. 

argument : Valeur sur laquelle opere une fonction. Un argument 
peut etre une constante, une variable ou une expression et est 
contenu entre les parentheses qui suivent la fonction. Parametre 
est un synonyme. 
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ASCII : Abreviation d'American Standard Code for Information 
Interchange ; c'est un code dans lequel les nombres de a 127 
reprSntent des caracteres de texte comprenant les chiffres de a 
9 les lettres de I'alphabet, les signes de ponctuation, des 
caracteres speciaux et des caracteres de controle. Ce code est 
utilise pour la representation de texte a I interieur du micro- 
oJdfnateur et poSr transmettre du texte entre micro-ordinateurs ou 
entre un micro-ordinateur et un periphenque. 

autocollant de protection d'ecriture : Petit autocollant, 
habituellement argente, utilise pour proteger le d,sque a I ecnture 
lorsqu'il recouvre I'encoche de permission d ecnture. 

avis : Sert a rappeler ou a signaler a I'utilisateur qu'une action 
donnee est attendue, generalement en affichant un symbole 
distinctif, un message de rappel ou un menu avec des choix 
possibles sur I'ecran. 

BASIC : Abreviation de Beginner's All-purpose Symbolic Instruction 
Code ; c'est un langage de haut niveau concu pour etre facile a 
apprendre et a utiliser Deux versions de BASIC sont disponibles 
chez Apple Computer pour etre utilisees sur Apple He •Applesoft 
(sous forme de memoire morte residente) et I'lnteger BASIC (fourni 
sur le DOS 3.3 SYSTEM MASTER disque). 

BASIC entier : Version du langage de programmation BASIC utilisee 
Sans la famille des ordinateurs Apple II ; plus ancien qu Applesoft 
il n'est capable que de trailer des nombres ent.ers (virgule f xe). Un 
interpreter pour creer et executer des programmes en BASIC 
entie° est inclus dans le disque systeme d'exploitation disque 3.3 
SYSTEM MASTER et il est automatiquement charge dans la 
memoire de I'ordinateur quand I'ordinateur est initialise avec ce 
disque. Voir Applesoft. 

binaire : Representation des nombres sous forme de puissance de 
deux en utilisant les chiffres et 1 . Communement utilisee dans 
les ordinateurs car les valeurs et 1 peuvent facilement etre 
reoresentees pour des grandeurs physiques sous differentes 
fo?mes Smme la presence ou ('absence de courant, una tension 
positive ou negative, ou un point blanc ou noir sur I ecran. 

bit : C'est un des deux chiffres binaires (0 ou 1) ; la plus petite 
unite d'information qu'il est possible de traiter avec un °rdinateur 
consistant en un simple choix, comme ou. ou non, marche ou i arret, 
positif ou negatif, quelque chose ou nen. Voir aussi hexadecimal. 

blanc : Caractere de texte dont la representation imprimee est ^un 
espace ou blanc ; on le tape sur le clavier en enfoncant la touche 

lEspacol ■ 

boucle : Portion de programme executee de facon repetitive jusqu'a 
ce que la limite soit atteinte. 

boucle emboTtee : C'est une boucle contenue dans le corps d'une 
autre boucle et qui est executee de facon repetee a chaque 
passage dans la boucle qui la contient. 
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boucle infinie : Portion de programme qui repete la meme sequence 
d'action indefiniment. 

branchement : Sert a renvoyer I'execution d'un programme a une 
ligne autre que celle qui suit en sequence. 

branchement conditionnel : Branchement qui a lieu si une condition 
est satisfaite. Voir branchement inconditionnel. 

branchement inconditionnel : Branchement qui ne depend pas 
d'une condition. 

bug ; Erreur dans un programme, erreur qui entrame un 
fonctionnement incorrect du programme. (Dans le langage 
courant : bug = punaise). 

caractere : Lettre, chiffre, signe de ponctuation ou tout autre 
symbole, utilises en impression ou affichage d'information sous 
forme lisible. 

caractere avis : Caractere de texte affiche a I'ecran pour aviser 
I'utilisateur d'une action donnee. II sert souvent aussi a identifier le 
programme ou la partie du systeme qui occasionne I'avis ; par 
exemple le caractere d'avis ] est utilise par I'interpreteur BASIC 
Applesoft, > parte BASIC entier, et * par le programme moniteur. 

caracteres de controle : Ms permettent de controler ou de modifier 
la facon dont I'information est imprimee ou affichee. Les caracteres 
de controle ont des codes ASCII entre et 31 et sont tapes sur le 
clavier de I'Appel He en maintenant enfoncee la touche I Ctrl I 
pendant que Ton app uie s ur une autre touche de caractere. Par 
exemple le caractere i Ctrl I - M (Code ASCII 13) veut dire "retour en 
debut de ligne" et est equivalent de la touche . 

Carte Texte 80 Colonnes Apple He : Une carte peripherique 
fabriquee et vendue par Apple Computer, Inc. Elle se branche dans 
le connecteur auxiliaire de I'Apple lie et convertit de 40 a 80 
colonnes la largeur de I'affichage du texte de I'ordinateur. 

Carte Texte 80 Colonnes Etendue Apple lie : Une carte 
peripherique faite et vendue par Apple Computer, Inc. Elle se 
branche dans le connecteur auxiliaire de I'Apple He et convertit de 
40 a 80 colonnes la largeur de I'affichage du texte de I'ordinateur, 
etendant sa capacite de memoire de 64K octets. 

catalogue (catalog) : Liste de tous les fichiers memorises sur un 
disque. Est aussi appele parfois repertoire. 

chatne de caracteres : Quantite d'informations formee d'une suite 
de caracteres de texte. Les deux exemples suivants sont des 
chaTnes de caracteres : "flipping frogs endanger widow's mite" et 
"(A + B)/973 = 14". 

chatne vide : Chatne de caracteres ne contenant pas de caracteres. 
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charger ■ Transferer des informations d'un peripherique de storage 
fcomme une disquette) dans la memoire centrale pour les ut.hser 
par exempli transferer un programme en memoae pour execufon. 

chiffre ■ (1) Un des caracteres a 9 utilises pour exprimer des 
nombres sous forme decimale. (2) Un des caracteres utilises 
pour exprimer un nombre d'une autre facon, par exemple et 1 en 
binaire ou a 9 et A a F en hexadecimal. 

clavier : Ensemble des touches integrees a I'ordinateur Apple lie, 
semblable a un clavier de machine a ecrire, pour entrer les 
informations vers I'ordinateur. 

code ■ (D Chiffre ou symbole utilise pour representor un fragment 
^formation sous une" forme compacte facile a traiter. (2) Les 
instructions constituant un programme. 

colonne : Arrangement vertical de points graphiques ou de 
caracteres sur I'ecran. 

rommande ■ Communication de I'utilisateur vers I'ordinateur 
fhaSeirement Tapee a partir du clavier) entraTnant une action 
immediate. 

concatener : Litteralement « chainer ensemble ». Sert a 
transformer deux chaTnes de caracteres (ou plus) en une, plus 
longue, contenant tous les caracteres des chaines d engine. 

Controle : Ordre dans lequel les instructions d'un programme sont 
executees. 

crash : Arret inattendu du travail, avec possibilite 
d'endommagement ou de destruction des informations en 
traitement. 

CRT : Voir tube cathodique. 

rurseur ■ Marqueur ou symbole affiche sur I'ecran qui signale la 
position oXrochaine'action prendra eff et. ou b^" I'endrort ou 
le prochain caractere tape a partir du clav.er s afficherE .. Les 
curseurs sont habituellement representes par ur carre blanc, un 
tiret sous le caractere ou un petit dam.er clignotant. 

debuq ■ Operation permettant de localiser et de corriger sur un 
svst" me une erreur ou la cause d'un probleme ou d'un mauva.s 
?onct^nnement. Typiquement utilise pour les problemes de logicel. 
Voir mauvais fonctionnement. 

decimal : Representation courante des nombres exprimes en 
puissance de 10 en utilisant les chiffres deOaS. 
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defaut : Valeur, action, activation utilisee automatiquement par un 
ordinateur quand aucune autre information explicite ne lui a ete 
fournie. Par exemple, si une commande de deroulement de 
programme a partir d'un disque n'identifie pas le lecteur de disque 
a utiliser, le systeme d'exploitation disque choisira 
automatiquement le lecteur qui etait utilise dans I'operation 
precedente. 

defilement : Sert a changer les contenus de tout ou partie de 
I'affichage de I'ecran en decalant I'information vers une extremite 
(le plus souvent vers le haut) de facon a faire de la place pour les 
nouvelles informations apparaissant a I'autre bout (le plus souvent 
vers le bas). Ceci produit un effet semblable au deplacement d'un 
rouleau de papier devant une fenetre de visualisation fixe. Voir 
fenetre. 

delimiteur : Caractere utilise comme ponctuation pour marquer le 
debut ou la fin d'une sequence de caractere et qui, par consequen- 
n'est pas considere comme faisant partie de la sequence. Par 
exemple, les guillemets (") sont utilises comme delimiteurs par 
Applesoft pour la chaine de caracteres D, O et G : "DOG" n'inclut 
pas les guillemets. En Francais ecrit, I'espacement est utilise 
comme delimiteur entre les mots. 

demarrage a chaud : Acte de reinitialiser I'Apple He bien qu'il soit 
deja sous tension, sans recharger le systeme d'exploitation dans Ie 
memoire centrale et souvent sans perdre le programme ou 
I'information deja en memoire. Voir demarrage a froid. 

demarrage a froid : C'est la procedure de demarrage de I'Apple He 
quand on vient de le mettre sous tension la premiere fois (ou les 
suivantes) en chargeant le systeme d'exploitation dans la memoire 
principale, puis en chargeant le programme et en I'executant. Voir 
demarrage a chaud. 

dimension : Taille maximum de I'un des indices d'un tableau. 

disque : Support de stockage d'information consistant en une 
surface plate, circulaire et magnetique, sur laquelle I'information 
peut etre enregistree sous forme de petits domaines magnetises d< 
la meme facon que les sons sont enregistres sur une bande. 

disque amorce : Voir disque d'initialisation. 

disque de demarrage : Disque contenant le logiciel sous la forme 
requise pour etre charge dans la memoire de I'Apple He pour rendr 
le systeme operationnel. On dit parfois aussi disque amorce. Voir 
amorce. 

disque flexible : Disque en matiere plastique flexible ; souvent 
appeles disques « floppy ». 

disque « floppy » : Voir disque flexible. 
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disquette : Terme utilise parfois pour les petits disques flexibles 
(5 pouces 1/4) utilises sur le lecteur Apple Disk II. 

donnees : Informations specialement utilisees ou traitees par un 
programme. 

DOS : Voir systeme d'exploitation disque. 

ecran : Voir ecran afficheur. Porte de visualisation. 

ecran afficheur : Le panneau en verrre ou en matiere plastique a 
I'avant d'un appareil d'affichage sur lequel les images sont 
affichees. 

ecrire : Transferer des informations du micro-ordinateur vers une 
destination externe (comme un lecteur de disque, une imprimante, 
un modem) ou a partir du processeur vers une destination qui lui 
est externe (comme la memoire centrale). 

edite : Sert a changer ou a modifier. Par exemple, pour inserer, 
deplacer, replacer, ou changer un texte dans un document. 

element : Un objet appartenant a un ensemble ou une collection ; 
plus precisement, une des variables individuelles constituant un 
tableau. Voir aussi indice. 

emplacement : Voir emplacement memoire. 

emplacement memoire : Unite de la memoire principale qui est 
identique par une adresse et peut retenir un seul cote d'information 
d'une taille determinee. Dans I'Apple lie un emplacement memoire 
contient un octet ou huit bits d'information. 

encoche de permission d'ecriture : Decoupe rectangulaire sur le 
cote du disque qui donne la permission d'ecrire sur ce dernier. S'il 
n'y a pas d'encoche de permission d'ecriture, ou si elle est 
recouverte par un autocollant de protection contre I'ecriture, 
reformation peut etre lue sur le disque mais ne peut pas etre 
ecrite. 

entier : C'est un nombre sans partie fractionnaire ; il est represents 
a I'interieur de I'ordinateur en virgule fixe. Voir nombre reel. 

entree : (1) Information transferee a I'interieur d'un ordinateur a 
partir d'une source externe quelconque comme un clavier, un 
lecteur de disque ou un modem. (2) L'acte ou I'accomplissement 
du transfert d'une telle information. 

E/S : Entree/Sortie. Transfert d'information vers I'interieur ou vers 
I'exterieur d'un ordinateur. Voir entree, sortie. 

execution : (1) Mener a bien, reussir une action specif ique ou une 
suite d'actions comme celles decrites par un programme. (2) 
Chargement d'un programme dans la memoire centrale a partir d ui 
peripherique de stokage, comme un disque pour I'executer. 
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execution differee : C'est la sauvegarde d'une ligne de programme 
Applesoft, qui sera executee plus tard, faisant partie d'un 
programme complet ; cela arrive chaque fois qu'une ligne est tapee 
avec un numero de ligne. Voir execution immediate. 

expression : C'est une formule dans un programme decrivant un 
calcul qui devra etre execute. 

expression arithmetique : Combinaison de nombres et d'operateurs 
arithmetiques (par exemple 3 + 5) qui indiquent qu'une operation 
doit etre effectuee. 

fenetre : Partie ou ensemble d'informations (document, image, 
feuille de travail) qui est visible sur une porte de visualisation sur 
I'ecran. Voir porte de visualisation. 

fenetre de texte : Zone de I'ecran de I'Apple lie a I'interieur de 
laquelle du texte est affiche et ou il peut defiler. 

fichier : Ensemble d'informations stockees comme une unite 
identifiee sur un support peripherique de stockage, tel un disque. 

fonction : Calcul preprograming qui peut etre execute sur demande 
a n'importe quel endroit du programme. 

format : (1) Forme dans laquelle I'information est organisee ou 
presentee. (2) Sert a specifier ou a controler le format de 
I'information. (3) Preparation d'un disque vierge a la reception des 
informations en divisant sa surface en pistes et secteurs ; on dit 
aussi initialiser. 

graphiques : (1) Information presentee sous forme de dessins ou 
d'images. (2) Affichage de dessins ou d'images sur I'ecran 
d'affichage d'un ordinateur. Voir texte. 

graphique basse resolution : Affichage de graphiques sur I'ecran de 
I'Apple He sous forme d'un tableau de 16 couleurs, large de 40 
colonnes et haut de 48 lignes. Quand la fenetre texte est en 
service, le graphique basse resolution visible est de 40 par 40 
points. 

graphique haute resolution : L'affichage de graphiques sur I'ecran 
d'affichage de I'Apple He en un tableau de points de 6 couleurs, 
large de 280 colonnes et de 192 lignes. Lorsque Ton utilise la 
fenetre texte, l'affichage graphique haute resolution visible est de 
280 par 160 points. 

hexadecimal : Representation de nombres en terme de puissance 
de seize, en utilisant seize chiffres a 9 et A a F. Les nombres 
hexadecimaux sont plus faciles a lire et a comprendre que les 
nombres binaires mais peuvent facilement et directement etre 
convertis sous forme binaire : chaque chiffre hexadecimal 
correspond a une sequence de quatre chiffres binaires ou bits. 
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indice : Nombre servant d'index et utilise pour identifier un element 
particulier dans un tableau. 

information : Fait, concept ou renseignement represents sous 
forme organisee. 

initialisation : (1) Positionner dans un etat initial ou a une valeur de 
depart pour preparer un traitement. (2) Preparer un disque vierge a 
recevoir des informations en divisant sa surface en pistes et 
secteurs ; on dit aussi formater. 

instruction : Element de programme dans un langage de haut 
niveau specifiant une action devant etre executee par I'ordinateur, 
cela correspond generalement a plusieurs instructions en langage 
machine. 

Integer BASIC : Voir BASIC entier. 

interface : On nomme ainsi le materiel, les regies ou les 
conventions au moyen desquels une partie du systeme 
communique avec une autre video inverse. C'est lorsque I atticnage 
de texte sur I'ecran se fait sous forme de points noirs sur fond 
blanc (ou tout autre couleur brillante) a la place de points blancs 
sur fond noir. 

K • Deux puissance dix, ou 1024 (vient de la racine grecque kilo 
voulant dire mille). Par exemple 64K veut dire 64 FOIS 1024, soit 
65536. 

kilo octet : Unite d'information de 1K (1024) octetc ou 8 K (8192) 
bits, voir K. 

langage : Voir langage de programmation. 

langage assembleur : Langage de programmation de bas niveau 
dans lequel les instructions specifiques en langage machine sont 
ecrites sous forme symbolique plus facilement comprehensible par 
un programmeur que le langage machine lui-meme. 

langage de bas niveau : Langage de programmation relativement 
proche de la forme sous laquelle le processeur de I'ordinateur peut 
directement travailler. Le langage assembleur en est un exemple. 

langage de haut niveau : Langage de programmation relativement 
facile a comprendre. FORTRAN, BASIC et Pascal sont tous des 
exemples de langages de haut niveau. Une instruction dans un 
langage de haut niveau correspond generalement a plusieurs 
instructions en langage machine. Synonyme : langage evolue. 

langage de programmation : Ensemble de regies ou de conventions 
pour I'ecriture des programmes. 

langage de programme : Unite de base d'un programme en 
Applesoft, elle contient une ou plusieurs instructions separees par 
des doubles points (:). 
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langage d'ordinateur : Voir langage de programmation. 

langage machine : Forme sous laquelle les instructions pour un 
ordinateur sont stockees pour etre directement executees par le 
processeur de I'ordinateur. Chaque type de microprocesseurs 
(comme le 6502 utilise dans I'Apple lie) ont leur propre forme de 
langage machine. 

lecteur de disque : Appareil peripherique qui ecrit et lit I'informatio 
sur la surface d'un disque magnetique. 

lecteur DISK II : Modele de lecteur de disque fabrique et vendu pat 
Apple Computer, Inc., pour etre utilise par I'ordinateur Apple He ; i 
utilise des disques souples « floppy » de 5 pouces 1/4. 

liaison : Suite automatique du texte de la fin d'une ligne au debut 
de la suivante comme sur I'ecran ou I'imprimante. 

lieu de demarrage : Voir demarreur. 

ligne : Arrangement horizontal de caracteres, d'espaces, ou de 
points graphiques sur I'ecran. 

limite en caracteres : Le nombre maximum de caracteres autorises 
pour une instruction Applesoft est 255. 

lire : Transferer de information dans la memoire de I'ordinateur a 
partir d'une source exterieure a I'ordinateur (par exemple un lecteu 
de disque ou un modem) ou a I'interieur du processeur a partir 
d'une source exterieure ou processeur (comme le clavier ou la 
memoire centrale). 

logiciel : Partie d'un systeme informatique consistant en 
programme, ce qui determine ou controle le comportement de 
I'ordinateur. Voir materiel et logiciel integre. 

logiciel integre : C'est une partie du systeme de I'ordinateur 
constitute de programmes figes en memoire morte. De tels 
programmes (par exemple I'interpreteur Applesoft et le programme 
moniteur Apple He) sont integres, en usine, dans I'ordinateur ; ils 
peuvent etre executes a tout moment mais ne peuvent etre ni 
modifies ni effaces a partir de la memoire centrale. Voir materiel el 
logiciel. 

materiel : Tous les composants physiques d'un systeme 
(electroniques et mecaniques). Voir logiciel et logiciel integre. 

memoire : Composant materiel d'un systeme qui peut stocker 
I'information pour la restituer plus tard. Voir memoire principale et 
memoire a acces aleatoire. Memoire uniquement lisible, memoire 
lisible et inscriptible. 
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memoire a acces aleatoire : Memoire dans laquel € — d«s 
emplacements individuels peut etre repere dans un ordre arb traire 
ou aleatoire. Ce terme est souvent utilise incorrectement pour 
parler d'une memoire vive mais, a strictement parler on peut avo.r 
acces de facon aleatoire a la fois a une memoire morte et a une 
Si vive. L'acces aleatoire signifie que chaque cellule de 
Sage n'a qu'une seule adresse et qu'il n'y a qu'une seule facon 
pour chacune d'elles d'etre lue ou ecrite. 

memoire morte : Memoire dont le contenu peut etre lu mais non 
7c™ On I'utilise pour stocker du logiciel integre. L'information est 

e en memoire morte une fois, en usine ; elle reste ensuite de 
facon permanente meme si I'ordinateur n'est pas alimente et elle 
ne peut plus etre ni effacee, ni changee. Voir memo.re vive et 
memoire a acces aleatoire. 

memoire principale : Partie memoire d'un systeme qui est a 
rinterieur de I'ordinateur et dont le contenu est directement 
accessible par le processeur 

memoire vive : Memoire dont le contenu peut etre a la fois lu et 
ecrit • on I'appelle parfois de facon abusive memoire a acces 
aleatoire ou RAM. L'information contenue dans une memoire a 
ectte et ecriture est effacee quand °n coupe ral.mentat^n de 
I'ordinateur elle est complement perdue sauf si le contenu a ete 
sauve aupa^avant sur un support plus durable comme un d.soue. 
Voir memoire morte et memoire a acces aleatoire. 

menu : Liste de choix presentes par un menu habituellement sur 
un ecran, a partir desquels I'utilisateur peut choisir. 

message d'avis : Message affiche sur I'ecran pour aviser 
I'utilisateur d'une action donnee. Appele aussi message d'accueil 
(demande de saisie d'une information) 

message d'erreur : Message affiche ou imprime pour aviser 
I'utilisateur d'une erreur ou d'un probleme dans I execution d un 
programme. 

mode : Etat d'un ordinateur ou d'un systeme qui determine son 
comportement. 

mode escape : Etat de I'ordinateur Apple lie, entre en enfoncant la 
touched dans lequel certaines touches du clavier prennent des 
significations speciales pour positionner le curseur et controler 
I'affichage du texte a I'ecran. Ce mode est parfois appele 
« evasion » sur certains documents Apple. 

Mode execution immediate : Execution d'une ligne de programme 
en Applesoft des qu'elle a ete tapee ; cela se produit quand une 
liqne est tapee sans numero de ligne. C'est un avantage particular 
d'Applesoft, qui n'existe pas dans de nombreux autres langages de 
programmation. Cela veut dire que vous pouvez essayer I une apres 
rautre chaque instruction pour voir sur le champ son resultat. Voir 
execution differee. 
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mode immediat : Mode de fonctionnement dans lequel, chaque f 
de ligne (caracterisee par le caractere retour de chariot) provoqui 
I'execution immediate de I'instruction ou des instructions 
contenues dans cette ligne. Ce mode s'obtient avec des lignes n 
comportant pas de numero de ligne. 

mode programme : (encore appele execution differee). Mode de 
fonctionnement dans lequel les lignes de programmes comporter 
toutes un numero de ligne. La fin de ligne (retour chariot) ne 
provoque pas I'execution des instructions contenues dans cette 
ligne. Ce mode permet de construire un programme dont 
I'execution sera lancee au moyen de la commande RUN. 

modulateur radio frequence : Appareil pour convertir les signaux 
video produits par un ordinateur dans une forme acceptable par i 
televiseur. 

modulateur RF : Voir modulateur radio frequence, 
moniteur : Voir moniteur video. 

moniteur video : Appareil d'affichage capable de recevoir des 
signaux video, en direct seulement, et qui ne peut recevoir de 
signaux diffuses comme la television commerciale. II peut etre 
directement connecte sur I'Apple He comme terminal d'affichage 
Voir televiseur. 

mot cle : Mot special ou sequence de caracteres qui identifie une 
instruction ou une commande particuliere, comme RUN ou PRIN1 

mot reserve : Mot ou suite de caracteres reserves par un langage 
de programmation pour une utilisation particuliere et, par 
consequent, pas disponible comme nom de variable dans un 
programme. 

nombre reel : Nombre avec une partie fractionnaire representee a 
I'interieur de I'ordinateur en virgule flottante. Voir entier. 

nom de fichier : Le nom sous lequel un fichier est stocke. 

normal : Se dit de l'affichage sur I'ecran lorsqu'il est constitue de 
points blancs (ou d'une seule couleur) sur fond noir. Voir inverse 

notation scientifique : Methode de representation des nombres 
sous forme de puissance de dix, tres utilisee pour exprimer des 
nombres qui peuvent varier dans de larges proportions, de tres 
petits a tres grands. Par exemple le nombre d'atomes dans un 
gramme d'hydrogene est approximativement 6,02E23 ce qui 
signifie 6,02 fois dix a la puissance 23. (La lettre E signifie 
« exposant »). Le nombre est ainsi plus facile a comprendre que 
sous la forme 602000000000000000000000. Applesoft utilise 
cette methode pour afficher avec precision les nombres avec plu: 
de neuf chiffres. 
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numero de ligne : Nombre identifiant une ligne programme dans un 
programme Applesoft. Les numeros de lignes sont necessaires pour 
les instructions differees. 

Octet : Unite d'information consistant en un nombre fixe de bits. 
Sur Apple lie, un mot contient huit bits et peut contenir n'importe 
quelle valeur entre et 255. Chaque caractere en code ASCII peut 
etre represents par un mot avec un bit supplemental a gauche. 

Operateur : Symbole ou suite de caracteres comme + , OR, AND, 
specifiant une operation devant etre accomplie sur une ou plusieurs 
valeurs pour donner un resultat. Voir operateur arithmetique, 
operateur relationnel, operateur logique, operateur monadique et 
operateur diadique. 

operation arithmetique : C'est un operateur comme le + , qui 
combine des valeurs numeriques pour donner un resultat 
numerique. Voir operateur relationnel et operateur logique. 

operateur binaire : C'est un operateur qui combine deux operandes 
pour donner un resultat ; par exemple + est un operateur 
arithmetique binaire, < est un operateur binaire relationnel, et OR est 
un operateur binaire logique. Voir operateur unaire. 

operateur logique : Operateur comme AND qui combine des valeurs 
logiques pour donner un resultat logique. Voir operateur 
arithmetique et operateur relationnel. 

operateur relationnel : Operateur comme > qui compare les valeurs 
numeriques pour donner un resultat logique. Voir operateur 
arithmetique, operateur logique. 

operateur unaire ou monadique : Operateur dont Taction s'exerce 
sur une seule operande, le signe moins (-) dans un nombre negatif 
comme - 6 est un operateur arithmetique unaire. Voir operateur 
binaire ou diadique. 

operations arithmetiques : Ce sont les cinq actions que Applesoft 
peut effectuer avec des nombres : addition, soustraction, 
multiplication, division et elevation a la puissance. 

ordinateur : Appareil electronique pour effectuer des sequences 
predefines (programmers) a haute vitesse et avec une grande 
precision. C'est une machine utilisee pour stocker, transferer et 
transformer I'information. 

page : (1) Le contenu d'un ecran rempli d'informations, ce qui 
consiste sur I'Apple lie en 24 lignes de 40 ou 80 caracteres 
chacunes. (2) Une zone de la memoire centrale contenant du texte 
ou des informations graphiques devant etre affichee sur I'ecran. 

pas : Quantite de laquelle une variable est incrementee ou 
decremented a chacun de ses passages dans une boucle. 
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peripherique : Dispositif exterieur d'une unite de traitement, il peut 
s'agir d'un element physique (comme un organe peripherique) ou 
d'un element logique (comme une carte peripherique). 

porte de visualisation : Tout ou partie de I'ecran de visualisation, 
utilise par un programme d'application pour afficher une portion de 
I'information (comme un document, une image, une feuille de 
travail) sur laquelle le programme travaille. Voir fenetre. 

precedence : Ordre dans lequel les operateurs sont appliques dans 
1'evaluation d'une expression. 

processeur : Composant materiel d'un ordinateur qui effectue le 
travail en executant directement les instructions qui se presentent 
sous forme de langage machine et stockees dans la memoire 
centrale. 

processeur unite centrale : Voir processeur. 

programmation : Action d'ecrire des programmes. 

programme : (1) Ensemble d'instructions, conformes aux regies et 
aux conventions d'un langage de programmation particulier, 
decrivant les actions a accomplir par I'ordinateur pour effectuer une 
tache donnee. En Applesoft, c'est une suite de lignes de 
programmes avec chacune un numero de ligne different. 

programme d'application : C'est un programme qui met les 
ressources et les possibilites de I'ordinateur au service d'une tache 
specifique, comme le traitement de texte, la gestion d'une base de 
donnee, du traitement graphique ou des telecommunications. Voir 
programme systeme. 

programme moniteur : Programme integre dans I'Apple lie en 
memoire morte, utilise pour verifier directement ou changer les 
contenus de la memoire centrale et pour travailler au niveau 
langage machine avec le processeur. 

programme qui boucle (pendu) : On dit d'un programme qu'il 
boucle lorsqu'il tourne sur lui-meme indefiniment, sans accomplir 
de tache utile. 

programmer : Ecrire un programme. 

programmeur : Auteur d'un programme ; quelqu'un qui ecrit des 
programmes. 

protection d'ecriture : Fait de proteger les informations contenues 
dans un disque en couvrant I'encoche de permission d'ecriture 
avec un autocollant de protection, empechant d'ecrire toute 
nouvelle information sur le disque. 
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puce : Petit morceau de materiau semi-conducteur (habituellement 
du silicium) sur lequel est fabrique le circuit integre. Le mot puce 
designe, a proprement parler, seulement le morceau de silicium, 
mais il est souvent utilise pour designer le circuit integre dans son 
boTtier. Voir circuit integre. 

punaise : Voir bug. 

RAM : Voir memoire a acces aleatoire. 
repertoire : Voir catalogue. 
ROM : Voir memoire morte. 

sauver : Transferer I'information de la memoire centale vers un 
support peripherique de stockage pour une utilisation ulterieure. 

sequence escape : C'est un e suit e de touches enfoncees, 
commencant pour la touche [Escl > utilisee pour positionner le 
curseur et controler I'affichage du texte a I'ecran. Voir mode 
escape. 

sortie : (1) Information transferee d'un ordinateur vers une 
destination externe quelconque comme I'ecran, un lecteur de 
disque, une imprimante ou un modem. (2) Le fait ou le traitement 
d'une telle information. 

sous-programme : Participation d'un programme qui peut etre 
executee sur demande en n'importe quel endroit du programme 
principal. Des la fin de son execution, il redonne le controle au 
programme principal au point qui suit I'endroit ou il a ete appele. 

syntaxe : Regie regissant la structure des instructions dans un 
langage de programmation. 

systeme d'exploitation : Systeme logiciel qui organise les 
ressources et les possibilites d'un ordinateur et les rend disponibles 
a I'utilisateur ou a des programmes d'application se deroulant sur 
I'ordinateur. 

systeme d'exploitation de disque : Logiciel optionnel pour 
I'Apple lie qui permet a I'ordinateur de controler et de 
communiquer avec un ou plusieurs lecteurs de disques, Disk II. 

systeme informatique : Un ordinateur et le materiel associe sous 
forme de logiciel. 

tableau : C'est une collection de variables referencees par le meme 
nom et distinguees entre elles au moyen d'indices numeriques. 
Chaque variable dans le tableau peut etre adressee de facon 
independante en utilisant son indice propre et unique. 
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tampon (buffer) : Espace de la memoire de I'ordinateur affectee a 
une tache specifique, comme le stockage d'informations 
graphiques, I'affichage sur I'ecran ou des informations de type 
caracteres de texte a partir d'un peripherique. Cet espace est 
souvent utilise comme zone de stockage intermediate pour 
transferer des informations entre les constituants travaillant a des 
vitesses differentes, comme I'unite centrale de I'ordinateur et une 
imprimante ou un lecteur de disque. Les informations peuvent etre 
stockees dans le tampon par un des sous-ensembles et etre lues 
par un autre a une vitesse differente. 

televiseur : Appareil d'affichage capable de recevoir des signaux 
video diffuses (comme la television commerciale) au moyen d'une 
antenne. II peut etre utilise avec un modulateur radio frequence 
comme ecran pour I'Apple He. Voir moniteur video. 

texte : (1) Information presentee sous forme de caracteres lisibles. 
(2) Affichage de caracteres sur I'ecran de I'Apple lie. Voir 
Graphique. 

utilisateur : Personne utilisant ou controlant un ordinateur. 

valeur : Quantite d'informations qui peut etre stockee dans une 
variable comme un nombre ou une chatne de caracteres. 

variable : (1) Emplacement dans la memoire de I'ordinateur ou une 
valeur peut etre stockee. (2) Symbole utilise dans un programme 
pour representor un tel emplacement. Voir constante. 

video : (1) Forme utilisee pour transmettre de I'information sous 
forme d'image pour etre affichee sur I'ecran d'un tube cathodique. 
(2) Information organisee ou transmise sous forme video. 

virgule fixe : Methode de representation des nombres a i'interieur 
de I'ordinateur dans laquelle la virgule (plus exactement la 
representation binaire de la virgule) occupe toujours la meme place 
a I'interieur du nombre. Generalement, on considere que la virgule 
est positionnee a I'extremite droite du nombre, ainsi le nombre est 
considere comme etarrt entier. Les nombres en virgule fixe d'une . 
longueur donnee couvrent une plus petite etendue que ceux en 
virgule flottante, mais ils sont plus precis. Voir virgule flottante. 

virgule flottante : Methode de representation des nombres a 
I'interieur de I'ordinateur dans laquelle la virgule (plus exactement 
la representation binaire de la virgule) peut flotter a des positions 
differentes a I'interieur du nombre. Un certain nombre de bits dans 
le nombre lui-meme est utilise pour reperer la position de la virgule. 
Les nombres en virgule flottante d'une longueur donnee couvrent 
une plus grande etendue que ceux en virgule fixe de la meme 
longueur, mais ils sont moins precis. Voir virgule fixe. 
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programmes utilitaires 203 
Remarques (REM) 58 
REM (instruction) 58, 59, 113 
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RENUMBER (programme) 203 
Renumerotation des numeros de 
lignes 202 

Repetition sans fin 1 08 
RETURN (instruction) 1 56, 
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7RETURN WITHOUT GOSUB 
ERROR 107, 166, 173 
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instructions graphiques 1 03 
R0T= 160 
RUN2 174 

RUN (instruction) 38-44, 1 57 
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quelle ligne 44 
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SAVE (commande) 46-49, 
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utilisant le DOS (Systeme 
d'exploitation disque) 
47-3, 48 

SCALE = 160 

SCRAMBLER (programme) 171 
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49, 55 
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chaTnes 124 
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Simulation d'une paire de 
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Sommaire de chapitre 

chapitre 1 34 

chapitre 2 70 

chapitre 3 86 

chapitre 4 1 20 

chapitre 5 141 
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sans espacement entre 

mots 64 
Sous-programmes 104, 106 

blocs 173, 174, 180 

pour afficher 

instructions 171 
Soustraction 1 
SPACE barre d'espacement 73 
SPACE (programme), 
APPLESOFT SAMPLER 67 
SPC 161 
SPEED = 160 
STEP (commande) 61 
Stopper le listage du 
programme 84 
STR? (fonction) 132, 157 
^STRING TOO LONG 
ERROR 124, 166 
Suite d'instructions 
memorisees 40 
Symbole de mise en garde XI 
Symboles utilises dans ce 
manuel XI 
Syntaxe 46 

7SYNTAX ERROR 19,26,97, 
124, 166 

Systeme boucle 1 67 
Systeme de numerotation 1 6, 
16, 68 
en mode graphique 68 
en mode texte 68 
Systeme d'exploitation disque 
DOS 147 
commandes DOS 145,156 
CATALOG 47, 202 
DELETE 83, 145, 148 
PFR$ 145, 156, 169 
SAVE 48, 157 
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elements de 1 36 
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137 
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lie 18 

Texte non formate 201 
TEXT (instruction) 1 58 
TO 161 

Touches a fleches 6 

direction 86 
Touche CAPS LOCK QD 3 
Trace 1 7 

TRACE (instruction) 1 08-1 1 0, 
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Traitement 9-12, 27-33 

ordre de 30 
Transferts de programmes 53 

7TYPE MISMATCH 
ERROR 131, 166 
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PUNDEF'D FUNCTION 
ERROR 166 
?UNDEF'D STATEMENT 
ERROR 166 

UP-ARROW (touche) [Q 84 
Utilisateurs 94 
recherche d'erreurs 110 

V 

Valeur 15,27 

incrementation de 
variables 28 
Valeurs numeriques 

virgule et point virgule dans 

leurs utilisations 65 
VAL (fonction) 131, 158 
Variable 24-30, 45, 68, 105, 
110, 182 

Appellations 24, 123, 175, 

189, 153 

ChaTne de caracteres 1 23 
definition 24, 153 
definition avec ('instruction 
LET 24 
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listage dans les 
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recapitulation des regies 29 
table 187-188 
utilisation avec 
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determines 175 
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compteur 1 75 
Variable numerique 123 
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